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SECTION I 
SCOPE AND PURPOSE 


LIBRARY MAINTENANCE (LIBMAINT) is a standard GC0S=-64 processor which 
performs functions and services convenient for the efficient 
management of libraries. Functions provided allow updating, copying, 
moving, listing and miscellaneous handling of library members. 


The contents of a library can be source language units (including 
JCL), compile units, load modules, shareable modules or master and 
sort tables. Libraries are homogeneous itn that they contain entities 
which are all of the same type. A Suitable protection mechanism (see 
Section IV) enforces this important rule. Therefore, in a given 
LIBMAINT session, only one type of entity can be handled. This type 
is indicated as a parameter to the processor at JCL level. One will 
thus indicate : SL, CU, LM, or SM depending on the types of entities 
to be processed. 


LIBMAINT accepts as its input libraries, specified members of a 
library or sequential files or subfiles defined as separate 
entities. This input can be stored on disk, tape or card. 


The output of LIBMAINT can be one or several members of a library or 
a sequential file or subfile. The contents can be printed, listed, 
modified or punched in the same single session. 


Actions requested of the LIBMAINT processor are expressed in terms 
of commands. LIBMAINT commands build up into a powerful language. A 
command is a directive to LIBMAINT to execute a function Such as 
copy a member from one library to another one or to update the 
contents of one or Several members in a library. A command is built 
up from the command word and Specific parameters, if needed. A small 
number of commands require additional detailed information on the 
action to be performed. These actions are known as requests and 
immediately follow the command in the command input stream. The 
command stream will generally be defined as being a user supplied 
input enclosure on cards’ the stream can also be a sequential file 
or a member of a source language library. These latter facilities 
are of particular help in the case of repetitive operations. 


SECTION II 
QBJECTS HANDLED 


Objects handled by LISMAINT may be stored in libraries, sequential 
files or on cards. 


LIBRARIES 


Libraries are files with Queued Linked Organization. A library can 
he viewed as being constituted of: 


~ a dictionary known as the "directory" 
~ a number of entities whose names appear in the directory. 
These are known as "sSubfiles", “units" or "members". 


LIBRARY 


DIRECTORY 


Each subfile is composed of 
logical records. The format of 
the logical records and their 
contents is dependent upon the 
type of the stored entity. In 
the case of a source language 
unit, for example, a record will 
contain one source line. 


MEMBER 
A” 


MEMBER 
”B” 


MEMBER 
as Os 


Due to their organization, which implies direct access to data 
blocks, libraries must reside on direct access devices and media, 
i.e. diskpacks. 
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SEQUENTIAL FILES 


Another method for storing an object acceptable to LIBMAINT is to 
store all units one after the other on a sequential file. Units need 
to be separated by some kind of delimiter. This delimiter is 
dependent upon the type of the stored entities and recognized by 
LIBMAINT in the proper context. 


| 


The sequential file might be any 
sequential organized media supported by 
GCOS-64 . i.e. disk, tape, paper tape, 
CTCeecece 


LIBMAINT allows the transfer of units 
from a sequential file to a library and 
vice-versa. 


A unit might also be stored on cards. Cards might be used as input, 
in which case they are added to the output library or file. These 
cards are inserted in the command input stream right after the 
corresponding transfer command or request. If the command input 
stream is not on card, the cards are replaced by their card images 
which might have been created and/or modified by the convenient 
processor. 


Cards might also be used as output. This is achieved by the PUNCH 
command that produces card image(s) of the specified object(s). 
These card images are generally acceptable as input to LIBMAINT. 


The format of the card deck is dependent upon the types of the 


stored entities. It is checked for validity by LIBMAINT in input 
mode and produced by LIBMAINT {f punched. 
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SECTION ITI 
UNIT IDENTIFICATION 


Unambiguous identification of a unit is vital for the rational 
management of libraries. In a library, each unit is uniquely 
identified bys 


- the name of the library where the unit is stored 
~ the name of the unit 

- the date and time it was first created 

- the date and time it was last modified 


- additional information depending on the type of the stored 
unit. 


This unique identification is displayed each time the unit is used. 
It is updated each time the contents of the unit are changed. A copy 
of a unit has the same identification (except name and name of 
containing library) as the original unit if no change has been made 


in the copy. 


The identification of a unit is recorded as a part of the unit, 
generally as its first logical record. 


Raw (SARF) format (see section VIII) source language units have no 


identification . However, this format of data is seldom used and 
should be avoided in libraries whenever possible. 
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EXAMPLE OF IDENTIFICATION DISPLAY? 


MYUNIT FROMs JOHN-X.CULIB 
CD = 09/26/77 CT = 23814 MD = 10/07/77 MT = 14825 SL = FOR CV = 1.0 


The first line contains? 


- The unit’s name 
- The name of the containing library 


The second line always contains? 


CD Creation date (MM/DD/YY) 
CT Creation time (HH 8 MM) 
MD Modification date (MM/DD/YY) 
MT Modification time (HH % MM) 


and possibly: 


- SL Source language (for CU and SL) 

- CV Compiler version (for CU) 

- LK Linker version (for LM) 

- MN Modification number (for SL, SM and LM) 
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SECTION IV 
PROTECTION 


In order to ensure the security of LIBRARY MAINTENANCE, Specific 
protection measures are taken. These are of two types? 


- at library level to ensure that only valid entities are stored 
in order to be able to later process the library correctly. 


- at unit level to ensure that no external action or cae will 
cause loss of information. 


LIBRARY LEVEL PROTECTION 


Two types of control are enforced? 


Type Protection 


It is checked that the library has been allocated with the correct 
attribute i.e.3 


- input library must be of the type specified by the LIBMAINT 
invocation 


- output library must be of the type specified by the LIBMAINT 
invocation. 


In all cases, a library with no type will be accepted as input or 
output by LIBMAINT. This might however result in errors which will 
be accepted as input or output by LIBMAINT, which in turn might 
result in errors which will be often irrecoverable. It is therefore 
recommended to allocate libraries specifying a correct type. 
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Characteristics checking 


In addition to the preceding verification, all output files or 
libraries are checked for valid file organization, record format and 
record size according to the following table 4-1. 


TABLE 4-1. OUTPUT FILES and LIBRARY CHECKING 
QUTPUT FILEORG LIBMAINT RECFORM RECSIZE 
| TYPE 


VB 
LM | _ 
FB 


S 

Cc 
Queued L = 1024 
Linked 

L 


Output 
library VB 
LIB 
F 
FB 
Qutput 
Sequential 


file 


SL VB 
Sequential F pion SARF* | no constraint 
FB 
| om | 


(x) SARF format will be discussed in section VIII. 


L 
U 
M 
M 
U 
Queued 
Linked M 
if SUBFILE 
specified 
in JCL 
ASSIGN 


QUTFILE 
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UNIT LEVEL PROTECTION 


In order to be protected against external unforseen actions such as 
killing the Job or. System Crash, LIBMAINT never overwrites an 
existing unit. Therefore, if LIBMAINT is not ailiowed by such 
external events to terminate its writing activity properly, the 
former version of the object unit still exists in the library. It 
proceeds as follows: 


~ creates a temporary unit whose name is 
"T BMNC” concatenated with the name of the unit. 


~ deletes the former version of the unit. 

- renames the temporary unit with the former version’s name. 
Even in the highly improbable case of an external event in the 
latter two steps above, the user will be able to recover the unit 
under its temporary name. 

AS a consequence of this policy, enough room must be given in the 
object library in order to accommodate both the old and new copies 


of a unit. A good rule is to provide enough space for all units plus 
the space needed for the largest of these units. 
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SECTION V 
AVAILABLE FUNCTIONS 


The aim of this chapter is to give a synoptical view of the LIBRARY 
MAINTENANCE FUNCTIONS. Two series of tables are given: 


~ A table stating the available commands in alphabetical order 
with the specific parameters and/or keywords applying to each 
type of entity (SL, CU, LM, SM) 


- A set of tables giving, for each type of entity, the allowed 
combinations of inputs and outputs. This second series of 


tables is preceded by a general overview of LIBMAINT inputs and 
outputs. 
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TABLE 5-1. 


COMMAND MEANS sd 


CODE To encode a text 


COMM To comment the 
; report 


COMPARE!|To compare two 


To create a unit 
containing 
member names. 


“CRLIST 


DECOQDE |To decode a text 


To delete 
unit(s) from LIB 


DELETE 


EDIT 


global 
EDIT 


EJECT 
| 


To invoke the 
TEXT EDITOR 


To repeatedly 
invoke the 
TEXT EDITOR 


To skip to the 
top of page on 
the report 


To execute a 
sequence of 
LIBMAINT 
commands 


SUMMARY OF COMMANDS 


WN 


CU 


YY 


KEY 

NEW 
FROM 

TO 
REPLACE 


FROM 
TO 
NUMBER 
REPLACE 


KEY 

NEW 
FROM 

TO 
REPLACE 


SS 


FROM ir 
TO 


Ll 
a 
= 


see | 
requests | 
sect.XIII: 


NEW 

FROM 

TO 

see 
requests 
sect.XIIIj 


VALUES 


VALUES 


Ho | 
WML 
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TABLE 5-1 (CONT). SUMMARY OF COMMANDS 


readability of 
a GPL unit 


LIST ‘To list entries 
of directory 


load a SM 


To convert a 
source unit 

into lower case 
letters 


LOWER 


REPLACE 


MOVE (To transfer units|NEW(x) 
FROM 
TO 
TYPE 
NUMBER 
END 
FORMAT 
INFORM 
QUTFORM 
CONTCHAR 
ENDCHAR | 
REPLACE 
CHECK 


(*)May not be 
used with 
COMF ILE 


PRINT 
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TABLE 5-1 (CONT). SUMMARY OF COMMANDS 


COMMAND MEANS SL CU LM SM 


PUNCH To punch unit(s) | FROM | FROM WS 
TO TO 
TYPE 
ENDCHAR 

RENAME | To rename NEW EW 

unit(s) FROM 

TO | 

RENUM- | To renumber FROM 

BER unit(s) TO 

NUMBER 


SORT To sort lines NEW 
S 


47 
oz 
= 


iS 


Ls 


V 


WY 


SORTKEY 
NUMBER 


ai a source FROM 


unit TQ 

TATUS {To continue or 
suspend the 
processing of 
commands 


ASC 
DESC 
To introduce a 
private title 


EVEN 


N 


| RESET RESET | RESET 


REPLACE 
in the report 


SMLIB 


requests 


Yy 


ye 
Yy 


CONTCHAR | 
ENDCHAR 
REPLACE 


UY 
UY 
di 


To convert a 
source unit 


into upper 
case letters 


Wa 


SS 
SSG 


UY 
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LIBMAINT INPUTS AND OUTPUTS 


LIBRARY MAINTENANCE supports up to three input libraries, an object 
library which can be treated both as input and output, an input 
file, an output file plus miscellaneous inputs and outputs. 
Selection of un{ts among the input libraries or files will be 
discussed in section VI. The following diagram illustrates the 
various LIBMAINT inputs and outputs together with the abbreviations 
used to denote them. 


input library] (INLIBI) Object library (LIB) 


input library2 (INLIB2) Output file (OUTFILE) 


input library3 CINLIB3) 


object library (LIB) Output report (SYSOUT) 


input file (INFILE) 
Punched cards 

(CARD PUNCH) 
command input stream 
(COMFILE) 


backing store 
(for SM only) 


Backing store 
(for SM only) 


ay pe ye 
INPUTS QUTPUTS 
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TABLE 5-2. AVAILABLE FUNCTIONS FOR SL 


OUTFILE 


SYSOUT 
sarf 


Input 


CODE 
COMPARE 
CRLIST 
DECODE 
DELETE 
EDIT 
EXEC 
INDENT 
ssf LOWER 
MOVE 
RENAME 
RENUMBER 
SORT 
UPDATE 
UPPER 


MOVE (x LIST (ss) | PUNCH (::) 


PRINT (x) 


CODE 
COMPARE 
CRLIST 


! DECODE 
INLIB42 EDIT 


3 EXEC 
INDENT 
ssf LOWER 
MOVE 
| SORT 
UPDATE 
UPPER 


1 
INLIB42 
3 


sarf 


LIB - 

ial ii 
Infile | LIST (sx) 

MOVE (x MOVE bre V x 3¢ ae 

ee Q = 

ae ee ae ce at NSS SX 

ieee SS > 

zie SSS 

| R& Ss 


(+x) : More than one unit can be processed in a single command (star convention; 
etc. See section VI). 
ssf/sarf : Distinction between these two formats will be discussed in section VIII. 


(:) 
(*) 
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TABLE 5-3. AVAILABLE FUNCTIONS FOR CU 


output 
LIB OUTFILE SYSOUT CARD PUNCH 


| | 


{ 

SS 
MOVE (#) SS PUNCH (x) 
LIB SS 
DELETE (x) SS 


MOVE (#) | MOVE(*) 


| | 
input 


PUNCH (*) 


| 
inure 
3 


\ 


COMFILE | MOVE (*) Ss SS SS gs$S wWw 


(*) More than one unit can be processed in a single command (star 
convention, etc... see section VI) 
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TABLE 5-4. AVAILABLE FUNCTIONS FOR LM 


MOVE (¥*) 
DELETE(*) 


RENAME( *) 


MOVE (*) 


INFILE MOVE (*) 
COMFILE | MOVE (#) SSX 
Resomaalh SS 


BACKING 
LAG SYSOQUT OUTFILE 
STORE 


[KS Qoewe KISS 
STORE SS UNLOAD —— 

LE MOVE SSS LIST 
eae lam SSS 


(*) More than one unit can be processed in a single command (star 
convention, etc ... see section VI) 
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SECTION VI 
BASIC LANGUAGE STRUCTURE 


The LIBMAINT command input stream is made up of a series of 
commands, requests and literal text. Requests and literal text are 
subordinated to a command which is the highest level structure in 
the LIBMAINT language. The purpose of this chapter is to underline 
the characteristics which are common to al] LIBMAINT commands 
together with the basic structure of the language. 


COMMANDS 


A command has the following general formats 
<VERB> <POSITIONALS>, <PARAMETERS> § 
- <VERB> is the name of the command 


- <POSITIONALS> stands for a sequence of positional parameters 
separated by commas or Spaces. 


~ <PARAMETERS> stands for a sequence of keywords or parameter 
values. A parameter value iS a parameter keyword followed by 
the equal sign (=) and by a value assigned to this parameter. 


All positional parameters, keyword and parameter values are 
separated by commas or Spaces(commas or Spaces or a combination of 
both may be used as delimiters between parameters and positionals). 
Qne or several spaces may appear inside the body of the command 
except within the VERB, keywords or values. The command terminates 
with a semi-colon. A command may Span several cards or records but 
no more than one command may appear on a single card or record. 


Examples: 
MOVE, JNLIBI?UNITI,, pREPLACE, NUMBER = (10,10)8, 
verb positional parameters 


Positionals, parameters and values other than library keywords and 
member-names are described under each command description in the 
following chapters. This chapter will concentrate on the rules for 
naning members and retrieving them. 
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SEARCH RULES 


As explained earlier LIBMAINT may take its input from any of the 
following: INLIBI, INLIB2, INLIB3, INFILE, LIB, COMFILE. 


The association of the above keywords with an actual library or file 
is made by JCL statements (see USER GUIDE). Libraries or files are 
to be specified only for input, as output is always LIB or OUTFILE 
depending on the JCL used for activating LIBMAINT. 


Search rules are the rules that govern the choice of the input 
library in which a unit is to be selected. There are two possible 
cases 


-~ The library is explicitly stated as a qualifier to the name of 
the member. This is achieved by means of the library or file 
keyword prefixed to the name by a colon. 


Example? 
MOVE INLIB!] % UNIT! 3¢ 
MOVE INFILE &* UNIT2 ¢ 


- The library is not explicitly stated in which case the 
following rules apply 3 


- if command is DELETE, RENAME or RENUMBER, the assumed library 
i. Lit 


-~ if more than one member is processed in a command by means of 
a list of member names, the assumed input library is LIB. 


- in all other cases, the named member is searched for, first 
in INLIB!I then in INLIB2, INLIB3 and last in LIB until a unit 
with the specified name is found. 


NOTE: LIBMAINT SM always works in LIB except for command MOVE which 


operates on INLIBI or INFILE. INLIBI is never indicated. 
INFILE needs to be specified when required. 
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MEMBER NAME 


A member name is composed of a string of alphabetic (A-Z), numeric 


(NOY aRA ermarit a} characters Tha lrlianuwanNn enartia 
VU 74 qin Speciaci Glilaal AU &Goa e 


want aw ~ oe 


1 aha +h. 
ane @iiOwe@G Spéeciadi CnNaracters Gre tne 


underscore (_), the minus (-) and period (.) symbols. There is no 
restriction on the first character and the maximum length of a name 
is 3! characters (30 characters for a SM or LKU). 


IMPORTANT NOTE? 


THE FOLLOWING DOES NOT APPLY TO LIBMAINT SM. 


As stated above, a member name may be prefixed by any of the 
following? 


COMFILE 3 
INLIBI 8 
INLIB2 3 
INLIB3 2 
LIB 2 
INFILE 8 


The library keyword 1s separated from the member name by a colon 
(3). Spaces are allowed before and after the colon. 
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TMPORTANT NOTE 3 
THE FOLLOWING DOES NOT APPLY TO LIBMAINT SM 


LIST OF MEMBER NAMES 


Most LIBMAINI commands can operate on more than one member. This is. 
Stated by indicating a list of members in place of the member name 
in the command. There are three basic means through which a list of 
members can be stated 3 


~ by an explicit list 
- by an indirect list 
- by the “star convention" 


Explicit List 


An explicit list of member names is formed by a list of names 
separated by commas or spaces and enclosed between parentheses. All 
members must belong to the same library: if none is specified, LIB 
is assumed. If member-names have a common prefix or suffix, these 
may be written outside the parentheses. These will act like factors 
in classical arithmetic. No Space is allowed between the prefix and 
the left parenthesis or between the right parenthesis and the 
suffix. 


Examples 2 


- (LIBEANAL, LIBERPRINT, LIBEREAD) 
or 
LIBE(ANAL, PRINT, READ) 


- (LIBSLERR, LIBCUERR, LIBLMERR) 
or 
LIB(SL, CU, LM)ERR 


If an explicit list of member names is prefixed with symbol not 
(1), this means that all members except those indicated in the list 


are to he processed. 


Examples & 


—1(LIBA, LIBB, LIBC) 
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or 
TLIBCA, B, C) 


~1OXXABYY, XXCYY, XXDEFYY) 
or 
XX (AB, C, DEF) YY 


IMPORTANT NOTE 2 
THE FOLLOWING APPLIES ONLY TO LIBMAINT SL 


Indirect List 


A list of the members to be processed may be given in a unit of a 
source language library. This list might have been created, for 
example, by the CRLIST command (see section VIII). 
To denote that the members list is given in a unit, one Specifies 
the unit name, possibly qualified by a library keyword, enclosed 
between " < " and " > " (search rules apply there). 
Examples 3 

-~ MOVE INLIBI # < LIB : SFLISTI > 3 


The members of INLIBI whose names are contained in unit SFLISTI of 
LIB will be moved to LIB 


- PRINT INLIBI : < LIST2 > 

'~ LIST < LIST3 >3 
The "not" convention may also be used with an indirect name list. 
This means that all members, except those whose names are listed in 
the unit, are to be processed. 
Examples 
- PRINT INLIB] 27< INLIB2 ¢ SFLIST4 > 
~ DELETE 1< LISTS > 


6-05 


IMPORTANT NOTE: 


THE FOLLOWING DOES NOT APPLY TO LIBMAINT SM 


Star Convention 


The star convention is a device which allows the specification of a 
name list in terms of a given pattern. All names that match the 
pattern are selected for processing. Constant sections of the 
pattern are expressed as such, variable sections are denoted by an 
asterisk or a star (*). When a name is found to match the pattern, 
the "*" replaces O to n characters. 


Examples 


Pattern Matches Does not match 
A*B AB AXYYXB AXBYB AXBY 

A*x*B same same 

A* A AX AXYZ XAX 

xA*BX any name with a B the 


right hand side of an A 
* all names none 
kk all names none 
If a library is specified before the pattern, the matching process 
applies to all members of the named library. If no library is 
specified, LIB is assumed. 
The “not" convention can also be used in combination with the star 


convention. It indicates that the command is to process all members 
that are not matched by the pattern. 


Ekxample 
LIB tULIB3* 


matches all members in LIB whose names do not begin with "LIB3",. 
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The user can also specify the first and/or last name to be matched 
by the star convention based on alphabetical order. The first and 
last names need not be the names of members, these are only 
reference values for comparison. 


IMPORTANT NOTE 3 


THE FOLLOWING DOES NOT APPLY TO LIBMAINT SM 


Examples & 
- LM*, FROM = LMAB, TO = LMXY 


means that all names beginning with LM, falling alphabetically 
between LMAB and LMXY (both inclusive) are to be processed. 


—- *XYZ, FROM = HHHXYZ 
AH*, FROM = G, TO =L 
*&, FROM = A, TO = P 

- x, TO = D3 


Limited Star Convention 


This limited form of the star convention has to be used 3 


- when the command has two positional parameters representing 
member names (Ex & COMPARE) 


~ when parameter NEW is uSed to create or update members under a 
new name 


Limited star convention restricts the number of asterisks in the 
pattern to one occurrence. FROM and TO parameters may also be used 
in this limited form. 

Examples 3 


~ COMPARE INLIBI & *, INLIB2 8% *OLD 


denote that all members of I[NLIBI are to be compared with the 
members of INLIB2 with the same name followed by OLD. 


- MOVE INLIBI * H*ERR, NEW = Z*WARN 
applied to a library containing members 3 
HMZIMZH 


HLIBERR 
HDBE RR 
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HLKZ 


will result in moving members HLIBERR and HDBERR into LIB and 
renaming them ZLIBWARN and ZDBWARN respectively. ! 


GENERAL FORMAT OF COMMANDS 


DOES NOT APPLY TO LIBMAINT SM 


Command-name 


emember~-name-2 
member-name |! 
(NEW = member-name-2 
INLIB! star-convention [FROM = member-name-3 | 
INLIB2 [,TO = member-name-4 ] 
INLIB3 
7 : 
LIB limited-star- freee star convention’? 
INFILE ; convention | »NEW = limited-star-convention-2 


COMFILE :/} | 
eFROM = member-name-3 


»lQ = member-name~4 
(explicit-name -list) 
| <indirect-name -list> (*) 


[,specific parameters and keywords ] 3 


(*) APPLIES TO LIBMAINT SL ONLY 
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To improve the legibility of subsequent chapters, the following 
conventions will be useds 


- “star-convention" will stand for “star-convention... 
FROM eee lOeee” 


- "limited-star-convention"™ will stand for 
"limited-star~-conventiones.eFROM «eee Tt! 


—- commas will appear as separators between parameters and 
positional keywords. It is understood that these may be 
replaced by one or more spaces. 
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SECTION VII 
COMMANDS APPLICABLE TO ALL LIBRARIES 
(Except SM) 


Following is a description of LIBMAINT commands which are applicable 
to all types of libraries : SL, CU, LM (not applicable to SM). 


Commands are sorted in alphabetical order and each description 
Starts at the top of a page. 
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COMM 


Functions’ 


To introduce comment lines in the LIBMAINT execution report. 


Format: 


COMM Text of the comments 


Il. The text of the comment may span several input cards or 
records. 


2. The text of the comment must be protected (i.e. enclosed 
between single quotation marks) if it contains a semi-colon. 


3. The text of the comment may be parameterized (see EXEC). 


Examples 


COMM “SAVE OF LIBRARIES $ LIST OF SAVED UNITS $ 


7-02 


Functions 


To skip to the top of a new page in the LIBMAINT report. 


Format: EJECT 3 


Rules? 


This command is not printed out in the execution report. 
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ESCAPE 


Functions 


To submit an OCL statement for execution in interactive mode. 


Format: 


ESCAPE OCL-statement 3 


Examples: 


ESCAPE DS X25 3% 
ESCAPE SI TEST48 fESTLIB:C!]O08MS/M400$ 
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EXEC 
Functions 
To execute a sequence of LIBMAINT commands stored in a source 


library SSF unit. The executed commands may be parameterized. 


Format? 


INLIBI 
INLIB2 unit-name [, VALUES = (pl,...0, p99)] $3 


INLIB3 
LIB 3 


Parameters? 


~ VALUES introduces a list of parameters which are to replace the 
corresponding &n in the executed unit (1 « n « 99). &!1 will 
be replaced by pl, $2 by p2, «ee &99 by p99. 
Acceptable forms for pl are? 


- an unprotected character string which does not contain 
the characters space, "3" , ","* , "#4. Spaces preceding 
the first character or following the last significant 
character are ignored. 


Example: VALUES = (ABCD, EFGH, I) 

~ a protected character string : i.e enclosed between 
Single quotation marks "’“", This string may contain any 
character but "7", 
Example: VALUES = (“STATUS ONLY 3 7%) 

~ an empty protected string t i.e. two consecutive single 
quotation mark characters. The corresponding &n 
combination will be merely eliminated from the executed 
text. 
Examplet VALUES = (A, % % , B) 

- an empty string ? i.e. two consecutive commas, possibly 
separated by spaces. The corresponding &n combination 
will be left as it is. 


Examples VALUES = ( A , » » D) 
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Rules: 


1 - EXEC may not appear inside an EXECuted sequence of LIBMAINT 
commands. 


2 - Replacement of &n by the corresponding pn is effective in 
~- LIBMAINT commands 
- EDIT command’s requests 
it is ineffective in data introduced by a LIBMAINT command 


(MOVE COMFILE? , UPDATE) or by an input mode request of the 
text editor (EDIT’s A, C, I). 


Examples 
unit EDIT 3 
R1B2 EXEC unit 
8384 VALUES = | &4 
85 (EDIT, 23% %%55)8 a5 
ea 48s 
re f2 83 4 85 
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QUIT 
Functions 


To terminate a LIBMAINT Session. This command is optional, an end of 
file mark on COMFILE is treated as a QUIT command. 


Format: QUIT 3 
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S!YATUS (also SM) 


Functions? 


To continue or suspend the processing of LIBMAINT commands when an 
error has previously occurred. 


Formats 
EVEN 
STATUS ONLY 3 
RESET 
Rules: 


1. STATUS ONLY proceeds with the execution of the following 
command only if no error has previously occurred. 


2. STATUS EVEN proceeds with the execution of the following 
command (and that command only) even if an error has 
occurred. 


3. STATUS RESET resets the error count to zero. 
Examples: 


1}. DELETE A 3 
The PRINT Command will be executed even 
STATUS EVEN 3 
if the DELETE failed. But PRINT B will 
PRINT C $ 
not be executed if either DELETE or PRINT C 
PRINT B failed 


2. DELETE A $3 
If the DELETE command fails, the 
STATUS RESET $% 
following commands are executed. 
PRINT B $ 


MOVE C $ 
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TITLE 


Functions 


To introduce a private title line after the standard LIBMAINT title 
lines in the execution report. 


Formats 


rules 


1. 


3 


TITLE [Text of the title]; 


The text of the title can span several input cards or 
records. The maximum length is 240 characters. 


2. The text must be protected between single quotation marks if 
a semi-colon appears in its body. 

3. The text may be parameterized. 

4. The TITLE command is not printed out on the execution report. 

5S. The new title text is taken into account from the first skip 
to top of page following the TITLE command. 

6. If the title is to he printed at the first page of the 
LIBMAINT report, the first two commands must he: TITLE x$ and 
EJECT? 

7s An empty text (i.e. : TITLE $ ) destroys the effect of a 
previous TITLE command. 

Examples? 


TITLE UPDATE OF SOURCE $3 
TITEE “TODAY $ 18 FEB 1978% $ 
TITLE 3 
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SECTION VITI 


COMMANDS APPLICABLE TO SL LIBRARIES 


The following is a description of the LIBMAINT commands that are 
applicable to SL libraries. 


A source language library contains a number of source units that may 
be: 


- in System Standard Format (SSF) 
~- in Standard Access Record Format (SARF). 


A source unit will typically contain a series of EBCDIC source text 
lines such as programs, documents, confidential information or any 
other kind of legible text. In normal mode, only SSF units are 
treated. However, some LIBMAINT commands apply to both (refer to the 
tables of section V) and conversion from one format to the other is 
possible (see MOVE command in this section) . 


SSF units are prefixed with a special control record which is not 
directly user visible and which holds the relevant identification 
information for the unit, namely? 


~ Date and time of creation 


Date and time of last update 

- Version number 

~ Language type 

- Size in lines 
This information is vital for the efficient handling of source 
language libraries and is automatically updated by LIBMAINT. Most 
commands display the identification of the units which they process. 
SSF source lines contain {nternal numbering which is left unchanged 


by all but the RENUMBER command (unless explicitly requested to do 
otherwise). 


SARF source units have no line numbering and no information on thetr 
status or identification. SARF is a "raw" format. 


Commands are presented in alphabetical order and each description 
Starts at the top of a page. 
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CODE 


Function: 


To provide maximum security for data stored in SSF source unit(s), 
this command permits the coding of the units contents according to a 
key which need not be stored in the system. 


Formats 


INLIB! 8 member~name-|l, NEW = member-name-~2 
INLIB2 8 star-convention 
INLIB3 3 limited-star-convention-—-| 
{(, NEW = limited-star-convention~-2] 
LIB 3 Cexplicit-name-list) 
<indirect-name~-list> 


, KEY = “keyvalue’  [, REPLACE ] 3 


Parameters’ 
- KEY is a protected string of no more than 16 non-bl ank 
characters which is used for the coding. This parameter is 
mandatory. 


—- NEW specifies the name(s) of the resulting member(s). This may 
be used with member-name or limited-star-convention. 


- FROM, TO may be used with star-convention and 
limited-star-convention. 
Keywords? 
- REPLACE allows the member-name being written in LIB to replace 
(over-write) a member with the same name previously 


present in library LIB. 


- if the specified or selected library is LIB and if NEW 
is not specified, REPLACE need not he specified. 


~ REPIACE may be used even if the LIB library contains no 
unit with the resulting memher-name. 
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Rules 8 
|. When member-name is specified, search rules apply unless a 
library keyword is used. 


2e When star convention, explicit or indirect name list is used, 
default library is LIB, unless a library keyword is specifiec. 


3. The result of the coding is in library LIB. 
4. See DECODE command for the reverse process. 


5. This command may be parameterized. 


Examples 


CODE INLIB! & SOURCE_PROC, NEW = CSOURCE_PROC, REPLACE, 
KEY = ?+*AW7$ 


CODE * , KEY = “MYKEY? $ 
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COMPARE 


Functions 


Compare two SSF source units and print out the changes made to the 
first argument unit to yield the second argument unit. 


Format: 


INLIBI 3 member-—name | 
INLI82 3 
COMPARE | 
INLIB3 3 
LIB [Ajlimited-star-convention-1 


INLIBI 3 member—name2 
INLIBO? 2 


[+Limrt=x | ; 


INLIB3 38 
LIB 3 limited-star-convention-2 


Parameters? 
~ LIMIT specifies the maximum number of discrepancies to be taken 
into account before processing stops. Default value is 
503 maximum value is 32767. 
- FROM, TO may be used with limited-star-convention. 


Rules3 


1. When member-name-1|1 or member—name-2 is specified, search 
rules apply unless a library keyword is uSed. 


2 When limited-star~-convention is used, default library is LIB 
unless a library keyword is uSed. 


3. The output is organized with the assumption that the first 
unit was edited, resulting in the second. 


4. Both compared members must be in SSF. 

5. Internal line numbering is not taken into account in the 
comparison process. Thus, two members which differ only by 
their numbering will be considered as identical. 


6. ‘the command may be parameterized. 
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Examples: 
- COMPARE H_LIBLE!I, H_LIBLEIBIS, LIMIT = 10 3 


H_LIB_E! and H_LIB_EIBIS are compared until 10 discrepancies 
are found. Search rules apply for both arguments. 


- COMPARE INLIBI % H_LIBLELIST, INLIB2 * H-LIB_ELIST 3 
H_LIB_ELIST in libraries INLIB!I and INLIB2 are compared. No 
search rule applies. Comparison will terminate if more than 50 
discrepancies are found. 


- COMPARE INLIB!I *s H_LIB_*, INLIB2 8 H_LIB_*_OLD, LIMIT = 1 3 
will compare 


INLIB] * H_LIB_ERR with INLIB2 * H_LIB_ERR_OLD 


INLIB?I * H_LIB_GO with INLTB2 * H_LIB_LGO_LOLD etc... 
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CRLIST 


Functions 


Create a SSF unit containing a complete or Selective list of the 
member names of a library or a list of user specified names. 


Format? 


INLIBI : member-name-—! \ 
INLIB2 2 star-convention — 
CRLIST 7 
INLIB3 3 (explicit-name-list) 
LIB 3 <indirect-name-list> 


, member-name-2 : NUMBER [ (nt E n2 ||] E REPLACE |: 

Parameters? 

~ FROM, TO may be used with star-convention 

Keywords? 

- NUMBER specifies that the lines of the created (member-name-2) 
SSF unit are to be numbered, beginning with nl, and 
incrementing by n2 for each new line. Default values are 
nl = 10 and n2 = 10. 

~ REPLACE allows the created member name to replace (overwrite) an 
existing member with the same name in LIB. This may be 
used even if no such member exists in LIB. 

Ruless 

I}. One record (line) is created {n member-name-? (in LIB) for 
each member-name specified in the command or found in the 
input library. The record contains the member name followed by 
a single Space character. 


2. Member-name-2 may be later used as an indirect name list by 
another LIBMAINT command 


3. When star-convention is Specified the directory of the 
specified or implicit (LIB) library is read and matching names 
stored in member~-name-2 of LIB. 


4. When member-name-!1, explicit or indirect name list, not 
preceded by "]"" are used, library keyword is immaterial. 


5. The command may be parameterized. 
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Examples? 


- This command will be best appreciated when one has to handle 
a set of members, the list of names of which cannot be 
easily obtained by star convention or explicit name list. 
Select a superset of the required names in a CRLIST command, 
then eliminate in the reSulting unit all undesirable names. 
The unit may then be uSed as an indirect name list. 


~ CRLIST is also useful when a series of commands is to he 
applied to the same set of members. One can then proceed as 
follows? 
CRLIST (list-of-the members) , MYLIST 3 


command |! eee < MYLIST > eeoee 3 


command n eee <MYLIST> cocci 


DELETE MYLIST $ 
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DECODE 


Functions 


Reconstruct the original unit, given a coded unit and its coding 
key. 


Format’ 


INLIBI 2 member-name-—! | »NEN = menber-name-2 | 
INLIB2 ¢ star-convention 


DECODE 


1 

INLIB3 ?{- limited-star-convention-| | NEW=1imt ted-star- 
convention-2 

LIB 3 (explicit-name-list) 

<indirect~-name-list> 

» KEY = “keyvalue" E REPLACE | ; 

Parameters? 

- KEY is a protected string denoting the key which was used to 
code the unit. [It is a string of no more than 16 non-blank 
characters. This parameter is mandatory. 

- NEW Specifies the name to be given to the reconstructed member. 
NEW may be used with member~-name-! or 
limited-star-convention. 


- FROM, TO may be used with star-convention and 
limited-star-convention. 


Keywords? 


~- REPLACE allows the reconstructed member to replace (overwrite) an 
existing unit in LIB. 


- if the specified or selected library is LIB and NEW is 
not specified, REPLACE need not be present. 


~- REPLACE may be used even if no member with the same name 
exists in LIB. 


Ruless 


1. When member-name is Specified, search rules apply unless a 
library keyword is used. 


2. When star-convention, explicit or indirect name list is sed, 
default library is LIB unless a library keyword 1s specified. 


3. The reconstructed member is written in LIB. 


4. See CODE command for the reverse operation. 
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5. The command may be parameterized 


Examples? 

DECODE LIB s CSOQURCE_PROC, NEW = SOURCE_PROC, 
REPLACE, KEY = % + SAW % 3 

DECODE LIB : * , NEW = K_* , KEY = % MYKEY % 3 


DECODE * , KEY = % @ XZK % $ 
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DELETE 


Functions 


Delete one or more units in a Source unit library LIB. 


Format 3 


member-name 
star-convention 


DELETE | ure | | 7] 


(explicit-name-list) 
<indirect-name-list> 


Parameters 3 


- FROM, TO may be uSed with star-convention 


Rules 


1. No search rule applies % member(s) must exist in library LIB. 
2. The only allowed library keyword is LIB. 
3. Deleted members may be in SSF or SARF format. 


4. Identification of deleted members is displayed for SSF 
memberSe 


5. The command may be parameterized. 


Examples 


DELETE LIB *A , FROM = ALPHA, TO = OMEGA 3 


DELETE SOURCE $3 
DELETE H*J % 
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EDIT 


Function? invoke the text editor using the requests following in the 
command input stream, 


Format: EDIT 3 


Rules: See section XIII. 


GLOBAL EDIT 


Functions 


Repeatedly invoke the TEXT EDITOR for a series of members defined in 
the EDIT command. 


Format 


INLIBI $ member-name~-! {, NEW = member-name~2 ] 
INLIB2 3 star-convention 
EDIT | <INLIB3 “] limited-star-convention-! 
{, NEW=limited-star-convention-2 ] 3 
LIB ; (explicit-name-list) 
<indirect-name-list> 


Parameters3 


~ NEW Specifies the name(s) of the unit(s) resulting from the W or Z 
requests (see Section XIII). This may be used with member-name 
or limited=-star-convention. 


~- FROM, TQ may be used with star-convention or 
limited-star~convention. 
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Ruless 


1. Requests for GLOBAL EDIT are identical to those for EDIT (see 


section XIII) except for extensions of R, A and Z. Such 
requests that refer to units defined in the command must take 
one of the following forms 3: 


INLIBI 8 
INLIB2 8 

R INLIB3 2 &0 
LIB 3 


[| [om] 


When a library keyword is used with the R request it must be 
the same as the one in the EDIT command. 


If NEW is used and member-name-~-2 exists in the LIB library, 
the corresponding W &O will be rejected, Z &0 will be accepted 
to overwrite the member. 


3. &O is reserved for R, W and Z requests. [It is replaced by the 


corresponding member-name in the command. 


Example 8 


EDIT INLIB! * H_*¥_ERR, NEW = I_*_WARN $3 


R 
r 
Z 
Q 


INLIB] + &0 


equests 


&0 


If INLIB! contains members & H_MZ_IMZH 


H_LIB_LERR 
H_LK_EDIT 
H_DB_ERR 


requests will apply to 


Hf LIBLERR to create an edited untt named [_LIB_LWARN and 
H_DB_LERR to create an edited unit named I_DB_WARN. 
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INDENT 


Function: 


Improve the readability of a GPL source unit by indenting it 
according to a set of rules described below. 


Formats 
INLIBI 3: member-name-| , | NEW = member-name~2 | 
INLTB2 8 star-convention 
INDENT INLIB3 3: “| limited-star-convention-| e NEW=lLimited- 
star-convention-2 | 
\\LIB 8 (explicit-name-list) 
| ~\<indirect-name-list> | 


xX | | IN = vy | E LM = 22 | E REPLACE | ; 


Parameters? 


- NEW Specifies the name(s) of the resulting member(s)3 this may 
be used with member-name and limited star-convention. 


- FROM, TO may be used with star-convention or limited 
Star-convention. 


- CM Sets the comment column to position xxx. Comments are lined 
up in this column unless they begin a line and are preceded by 
a blank line (or are at the beginning of the program or are a 
comment beginning in column 1). If this parameter is omitted, 
default for xxx is 6]. 


- IN Sets the value of indentation for each level to yy. Each DO, 
BEGIN, etc... statement will cause additional yy spaces of 
indentation until the matching statement is encountered. If 
this parameter is omitted, default for yy is 5. 


- LM Sets the left margin (indentation for normal program 
statement) to zz. If this argument is omitted, default value 
for zz is Il. 


Keywords’ 


- REPLACE Allows the member(s) being written to the output 
library LIB to replace (overwrite) existing member(s) with the 
same name. 


~ [If the specified or selected library is LIB and NEW is not 
used, REPLACE need not be stated. 


- REPLACE may be used even if the resulting member(s) do not 
exist in LIB. 
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4. 


5e 


7. 


When member~-name is specified, search rules apply unless a 
library keyword is stated. 


When star-convention, explicit or indirect name list is used, 
default library is LIB unless a library keyword is specified. 


The resulting member(s) are obtained in LIB or QUTFILE 
depending on LIBMAINT assignments. 


Declaration statements are indented five spaces. Structure 
declarations are itndented according to structure level number. 
After level 2, additional levels are indented two more spaces 
each. 


Multiple Spaces are replaced by a Single Space, except within 
strings or non-leading spaces in comments. Spaces are inserted 
before a left parenthesis, after commas, and around the 
constructs = , -> , < =, >= , and 1=. Spaces are deleted 
when found after a left parenthesis or before a right 
parenthesis. 


- Parentheses are counted and are expected to balance at every 


semi-colon. If parentheses do not balance at a semi-colon, or 
if the unit terminates in a string or in a comment, a 
diagnostic is produced. 


The command may be parameterized. 


Examples? 


IDENT INLIB3 # PROG, NEW =IPROG, CM = 81, LM = 7, IN = 3 3 
INDENT LIB * * , FROM = ALPHA, TO = OMEGA, 
NEW = *NEW REPLACE, CM = 71 $ 
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LIST 


Functions 


Produce a complete or selective table of contents of a source 
language library or SSF sequential file. 


INLIBI . member-name 
INLIB2 


INLIB3 star-convention 
LIB 8 (explicit-name-list) 
INFILE <indirect-name-list> 


Parameters’ 
- FROM, TO may be used with star~convention 


- SIZE When specified, allocated space is displayed for each member 
(unit = | block) 


!. When member-name is specified, search rules apply unless a 
library keyword or INFILE is used. 


2. When star-convention, explicit or indirect name list is 
specified, default library is LIB unless a library keyword or 
INFILE is used. 

3. For a library, members are listed in alphabetical order. 

4. For a sequential file, members are listed in storage order. 

5. For a library, occupancy information is displayed. 

6. Identification of SSF units is displayed 

7. The command may be parameterized 

Examples3 


LIST INFILE * MEMBER_*_NEW $3 
LIST * , FROM = ALPHA, TO = OMEGA 3 
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LOWER 


Function: 


Convert source language unit(s) into lower case letters. 


Formats 


INLIBI 8 member-—name-—! | »NEN = member-name-2 | 
INLIB2 3 star-convention 
LOWER 7 | 
INLIB3 3 limited-star-convention-| | .NEW=1 imi ted 
star—convention-2 | 
LIB 3 (explicit-name-list) | 
<indirect-name-list> 


| »REPLACE | ; 


Parameters? 


~ NEW Specifies the new name(s) to.pe: given ba. ene: Sonu eter 


~ FROM , TO May be used with star-convention or 
limited-star-convention. 


Keywords? 


~ REPLACE Allow the unit(s) being written in output library LIB to 
replace (overwrite) an existing unit with the same name. 


- if the specified or selected library is LIB, and if NEW is not 
specified, REPLACE need not be stated. 


- REPLACE may be used even if no member with the same name exists 
in LIB. 


Rules’ 


1. When member-name is used, search rules apply unless a library 
keyword is specified. 


2. When star-convention, limited=-star-convention, explicit or 
indirect name list is used, default library is LIB unless a 
library keyword is specified. 

3. The command may be parameterized. 

Examplest LOWER LIB & MYMEMBER $ 


LOWER INLIB! & <INLIB2 # MYLIST> $ 
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MOVE 


Functions 
- Move one member from COMFILE to a library. 


~ Move one or more members from a library to the LIB library or 
to a sequential file. 


- Move one or or more members from a sequential file to a library 
or another sequential file. 


~- Move a SSF member from a library to the LIB library or to a 
sequential file with SARF format (SSF to SARF)$ 


- Move a SARF member form a library or Sequential file to the LIB 
library with SSF format (SARF to SSF). 


Format: 


INLIBI 2 member-name- 1 E NEW = nember-name-2| 
INLIB2 3 

star-convention 

INLIB3 3 


LIB 8 limited-star-convention-1 »NEW = 
limited=star-convention-2| 
COMFILE 3 (explicit-name-list) 
INFILE 8 <indirect-name-list> 
, TYPE = hanguace=tyoel| » NUMBER | = Cn] F n2 |] | 


k END = yee 


|, INFORM = 4 ?] » QUTFORM = 3 | .REPLACE | | scHEck | 
‘UsaRF) SARE 


E ENDCHAR= “char! "| | «CONTCHAR = "char 14| | FORMAT=(n I yn2,n34n4 [ans |) | ; 


Parameters’ 

- NEW Specifies the name(s) of the resulting member(s). This may be 
used with member-name or limited-star-convention. NEW cannot 
be used with COMFILE ! or INFILE & with SARF. 


- FROM, TO may be used with star-convention or 
limited-star-con,ention. 


- TYPE determines the language type of the output unit. This type 
will be permanently associated with the unit and be part of 
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GPL 


— r= 


Fd 
[est or ooannx [extents crooe [1 

[ene or comm [own [+ [|r [mle 
Tare [nities toporé rowron [> [© [+ [oo[o 
[act [aes contrat tonne Lo [| [oo 


DAT or DATASSF | Data in SSF format 


DEL or HUDEL 


its identification. The language type determines the default 
FORMAT (see below) of input records when the user transfers 
units from COMFILE, input libraries or INFILE in SARF format. 
In these cases TYPE is mandatory. It is possible to use 
parameter FORMAT to override the default values provided. The | 
following table gives these default values (refer to FORMAT, 
below for explanations). 


TABLE 8-1. DEFAULT FORMATS 


Default FORMAT 


Honeywell User 
Document Entry 


GCOS Programming 7 80 
Language 


- NUMBER Specifies that the line numbers (if any) in the input 


~ END 


records are to be discarded and that the lines be numbered 
beginning at n! and incrementing by n2 at each new input 
record. Default values are n!l = 10 and n2 = 10. 


Denotes the marker to be used to Specify the end of a 
sequence of input cards in COMFILE. 


- maximum length of string is 8 characters 
~ all characters except single quote mark are allowed 
~ {if END is omitted, implicit value for string is //EOD 


~ string or //EOD is mandatory when COMFILE is used3 it 
must begin in column | of the {nput record. 


~ FORMAT This parameter is used to override default values derived 


from the language type or the TYPE parameter. It defines 
the position of the line number, of the text and vertical 
form control fields in the record. This is defined by means | 
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of 5 values denoted as nl, n2, n3, n4 and n5. 


~- Line number field expands from columns n! to n2. Zero 


values denote that no line number is present. The line 
number must be right justified in the field. Blanks are 
treated as zeroes. 


- Text field expands from columns n3 to n4. It may overlap 


the line number field. 


- n5 is used to specify the column in which a particular 


CONTCHAR 


ENDCHAR 


INFORM 


form control option is coded. Zero value denotes no form 
control option. Applicable codes aret 


Space vertical space |! line before this line 

O double space before this line 

- triple space before this line 

+ do not vertically space before this line 
| Skip to top of page with this line. 


Character * may be used to denote variable length fields. 
If n2 = x, line number terminates at first non-digit 
character. If n3 = *, text field begins with the first 
non=digit character on input record except when this 
first non-digit character is a Space. If n4 = *, text 
continues until end of record. Neither nl nor n5 may be 
*e 


the character defined by parameter CONTCHAR is considered 
as a continuation mark if it is the last significant 
character of an input card or of a SARF record. This 
option may be used with MOVE with INFORM = SARF 3 it may 
be used simultaneously with ENDCHAR (see below). 


The character defined by parameter ENDCHAR is considered 
as an end of record delimiter if it is the last 
significant character of an input card or of a SARF 
record. This option may only be used with MOVE with INFORM 
= SARF s it may be uSed simultaneously with CONTCHAR (see 
above). When ENDCHAR is specified, all input records must 
terminate with the specified character. 


Specifies that input member is in SARF or SSF. 
Default is SSF. 


QUTFORM Specifies that output member is to be SARF or SSF. 


Default is SSF. When QUTFORM = SARF, line numbers are 
inserted in the text in accordance with the standard 
format corresponding to the members type (if any). This 
format may be averridden by parameter FORMAT (see above). 
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Keywords’ 


- REPLACE Allow the member(s) being written in output library LIB to 


~CHECK 


Ruless 


replace (overwrite) member(s) with the same name 
previously existing in LIB. 


~ When assigned LIBMAINT output is OUTFILE, REPLACE is 
ignored and command will operate regardless of whether 
REPLACE permission is given or not. 


- REPLACE may be used even if no member with the resulting 
name is present in LIB. 


Specifies that it is to be checked that line numbers (for 
type = GPL, COB, CBX ) are in non-descending order. This 
option can be used with MOVE COMFILE and MOVE INFILE SARF. 


1. When member-name is specified, Search rules apply unless a 


Li 


brary keyword, COMFILE or INFILE is used. 


2. When star-convention, explicit or indirect name list is used, 


de 


fault library is LIB unless a library keyword or INFILE is 


specified. 


3. Li 


brary keyword LIB cannot be specified when LIBMAINT 


assigned output is OUTFILE. 


4. Th 


Examples? 


e command may be parameterized, 


1. To store a whole unit read from cards into a library or 
sequential file 


MO 
C, 
C, 
[, 


VE COMFILE % member-name [, FORMAT ...] [£, CHECK] 
OUTFORM = .ee] £, NUMBER = ..-] , TYPE = wees 
END = “string’] £, REPLACE] [, CONTCHAR = ...] 
ENDCHAR = eee ) 3 


Qutput may be SARF or SSF 
Records of more than 80 characters can be created by means 
of CONTINUE or RECEND. The maximum length of such records 
is however limited to 256. 


MOVE COMFILE * SI, TYPE = DATASSF, END = “FIN*% , REPLACE $ 


deck of cards 


FIN 
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2. To transfer SSF units from a library or file into a library 


or file. 
INLIBI 38 member=namel [, NEW = .....] 
INLIB2 3 star-convention 
MOVE INLIB3 “]] (Limited-star-convention [, NEW = ....] 
INFILE ?}. (explicit-name-list) 
LIB <indirect~name-List> 


[, REPLACE] [, NUMBER] 3 
Output is LIB or OQUTFILE depending on the LIBMAINT 
assignment. 
MOVE INLIBI * >] * OLD 
MOVE TEST4, NUMBER, REPLACE 3 
MOVE INFILE & * 3 
MOVE INFILE : UNITI, NEW = UNIT2, NUMBER, TYPE = COBOL $ 
MOVE INLIBI] & *, FROM = ALPHA, TO = OMEGA$ 
MOVE INLIB3 # UNIT (1, 2, 3, 4), NUMBER 3 
MOVE <INLIB2 # MYLIST> , REPLACE $ 
3. To transfer SARF from INFILE into LIB or QUTFILE. 
MOVE INFILE & member-name, INFORM = SARF, TYPE = «ee , 
{, OUTFORM = ...] [, CHECK] [, REPLACE] [, FORMAT] 
[, CONTCHAR = ... J] £, ENDCHAR = ...] 3 
~ Qutput is LIB or OUTFILE depending on LIBMAINT assignment. 
- Output may be in SSF or SARF (OUTFORM parameter ) 
~ MOVE INFILE : UNITI, TYPE = DATASSF, FORMAT = (0, 0, !, *), 


INFORM = SARF 3 


4. To transfer SSF or SARF from a library into LIB or QUTFILE in 
SARF 


INLIBI 8 member-name 

MOVE INLIB2 3 star-convention {, FORMAT = ee] 
INLIB3 (explicit-name-list)\{, NUMBER = ...] 
LIB 3 <indirect-name~-list> 


[, TYPE = wees J , QUTFORM = SARF [, INFORM = 2.02] $ 


- FORMAT describes. the output format. 


° 8-2 1 


—- MOVE UNIT!I, OUTFORM = SARF, TYPE = COBOL 3 


-~ MOVE INLIB2 * UNIT1, OUTFORM = SARF, TYPE = CBX, FORMAT = 
CAstcoth. 4% 


~ MOVE UNIT], OUTFORM = SARF, FORMAT = (1, 6, 7, *) 3 
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PRINT 


Functions 
Print the contents of one or more members of a source unit library 
or sequential file, 


Formats 


INLIB! member-~name 
INLIB2 star-convention 
INLIB3 


LIB 8 (explicit-name-list) 
INFILE 3 <indirect-name-list> 


{, COPIES = x] { , NTAB] $ 


Parameters? 
- FROM, TO may be used with star-convention 
- COPIES Specify the number of copies to be produced (! € x € 9) 


Keywords: 


- NTAB & Do not expand tabulation characters (hexadecimal 05) 
Ruless 


1. Search rules apply when no library keyword nor INFILE is 
specified. 

2. When star-convention, explicit or indirect name list is 
specified, default library is LIB, unless a library keyword 
or INFILE is specified. 


3. Selection of a member or set of members from INFILE is 
possible. 


4. The command may be parameterized. 
Examples: 


PRINT INFILE 3: 1<LIST> , COPIES = 3 3 
PRINT * 3 
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PUNCH 


Functions 


Punch one or more members of a source unit library or sequential 
file in SSF format. 


Format? 


INLIB! member-name 

INLIB2 star-convention 
INLIB3 . 

LIB Cexplicit-name-list) 
INFILE <indirect-name-list> 


{, TYPE = language-type] {, ENDCHAR = “char!/7] $3 


Parameters? 
- FROM, TO may be used with star-convention 


- ENDCHAR the specified character is to be punched as the last 
character of each output record. 


- TYPE Determine the format in which cards are to be punched. 
Basically, TYPE indicates the positions in which the line 
numbers are to be punched (if any) and the width of the 
punched text. PUNCH is such that the punched cards will be 
accepted as such by the MOVE COMFILE command with the same 
TYPE parameter. When no type is specified, the stored unit | 
type is assumed. The following table summarizes the 
punching conventions according to the language type 
indicated. 


TABLE 8-2. PUNCHING CONVENTIONS 


Language 

type Means Line number Text 
COBOL or | Standard 1 to 6 7 to 80 
COB COBOL 


COBOLX orj| Extended 
to 6 Tto 72 
COBOL. 
FORTRAN 
or FOR FORTRAN None to 72 


Unified Report 
RPG Generator None 1 to 80 
Language 
Job Control 
None 1! to 80 


Language 
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TABLE 8-2. (CONT). PUNCHING CONVENTIONS 


DATASSF System Standard 
or DAT Format Data 


GCOS 
Programming 
Language 


Rules 

I. If the specified member has no associated type and TYPE 
parameter is not supplied, an error occurs. 

2. When member-name is Specified, search rules apply unless a 
library keyword or INFILE is specified. 

3. When star-convention, explicit or indirect name list is used, 
default library is LIB unless a library keyword or INFILE is 
specified. 

4. The line number and text are punched according to the unit/’s 
language type or the supplied TYPE parameter. 

5. Records longer than 80 characters are truncated, unless 
ENDCHAR is specified. 

6. the command may be parameterized. 

Examples: 


PUNCH INLIB! : HLIB* , TYPE = COBOL 3 


PUNCH * 3 
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REN AME 


Functions 

Rename one or more members of a source unit library in SSF or SARF 
format. 

Format: 


Member-namel, [ NEW =] member-name-2 


RENAME [LIB #] 


{ijlimited-star-convention-1, [NEW = | limited- 
star~convention-2 


Parameterss 
- NEW Specify the new name(s) of the renamed member(s). 


- FROM, TO may be used with star-convention or 
limited~-star-convention. 


Rules? 


'. New member name(s) must not exist on LIB + REPLACE parameter 
is not allowed. 


2- Renamed member(s) must be present in LIB. 
3. After the command, the old name(s) no longer exist. 


4. The command may be parameterized. 


Examples? 
RENAME HLIBX3 , NEW = LIB_3 3 


RENAME LIB 2 H*ERR, I*WARN 3 
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RENUMBER 
Functions 


Renumber one or more source members in SSF format into LIB. 


Formats 


el 


member-—name 
RENUMBER [LIB +] [7] star-convention 
Cexplicit-name-list) 
<indirect~name-list> 


[NUMBER [= (nt [, n2])] ; 


Parameters: 


~- FROM, [TO may be used with star convention. 
~ NUMBER specify the initial value and the increment used for 


numbering. nl is the initial value, n2 is the increment. 
Default value is 10 for both ni and n2. 


Rules’ 


1. Members must be present in library LIB. 


2 The command may be parameterized. 


Exampless 
RENUMBER UNITI, NUMBER = (1, 1) $ 
RENUMBER UN*x , NUMBER = (20, 20) $ 
RENUMBER UNIT (1, 2, 3, 18, 27) $ 


RENUMBER * FROM =H, TO = Y $ 
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SORT 


Functions: 


Sort the lines of a SSF source unit or units in ascending or 
descending EBCDIC collating sequence. 


Formats 


INLIBI 2 memb er—name |! {, NEW = member -name-2] 
INLIB2 3 star-convention 
INLIB3 st) }}/TWJlimited-star-convention! [(, NEW = 
limited-star-convention-2] 
LIB 3 (explicit-name-list) 
<indirect-name-list> 


ve ASC ] 


[, Desc ] 


[REPLACE ][SORTKEY = (nI (,n21)] 
[, NUMBER [ = (n!I {,n21 )]] 3 


Parameters: 


- NEW Specify the name(s) to be given to the resulting unit(s). It 
may be used with member-name or Limited~star-convention. 


- FROM, TO May be used with star convention or limited star 
convention 


- SORTKEY - nl gives the position of the first character of the 
sort key in the record (line). 


- n2 maximum length of the sort key. If omitted, 
n2 = 256 - nl is assumed. 
- if SORTKEY is omitted, default values taken are 


n!i = | and n2 = 255 (i.e. the key is the whole 
record). 


~ NUMBER specifies that the lines of the created (member-name-2) SSF 
unit are to be numbered, beginning with nl, and 
incrementing by n2 for each new line. Default values are nl 
= 10 and n2= 10. 

Keywords: 


- ASC Sort in ascending order. 


- DESC Sort in descending order. 
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- REPLACE Allow the member-name(s) being written to output library 


Ruless 


l. 


26 


LIB to replace (overwrite) an existing unit with the same 
name in LIB. 


- if the selected or specified library is LIB and if NEW 
is not specified, REPLACE need not be specified. 


- REPLACE may be used even if the resulting member(s) do 
not exist in LIB. 


When member~name is uSed, search rules apply unless a library 
keyword is specified. 


When star-convention, explicit or indirect name list ts 
specified default library is LIB unless a library keyword is 
given. 


The resulting member(s) are output on LIB. 
The command may be parameterized. 


SORT is restricted to sorting reasonably small units (a few 
thousand lines is a maximum). For other applications the GCOS 
SORT utility should be used. 


Examples? 


SORT INLIB2 * MYSI, DESC, SORTKEY = (1, 109) 3 


SORT INLI31 3 HLIB*® , NEW = ZLIB* , REPLACE $ 


8-29 


UPDATE 


Function: 
Modify the contents of a source unit according to the requests 


following the commands in the command input stream. UPDATE provides 
limited editing facilities. 


Formats 


INLIBI 8 member-name-! [,NEW = member-name2 | 
INLIB2 8 star-convention 
UPDATE INLIB3 8 limited-convention-1! [,NEW = limited~ 
star-convention~-2 
LIB 2 (explicit-name-list) 
<indirect-name-list> 


[, NUMBER [= (n1 [, n2 )]] [, TYPE = language-type] 
[, END = “string’] [, FORMAT = (nl, n2, n3, n4[, n5] 9] 
[, REPLACE][, CONTCHAR = ’char1][} ENDCHAR = “chari’] 3 


~NEW Specifies the name(s) of the resulting member(s). This may 
be used with member-name or limited star-convention. 


-~FROM, TO May be used with star-convention or limited 
star-convention. 


- TYPE Determines the type of the output unit. This type is 
permanently associated with the unit and is part of its 
identification. The language type determines the default 
FORMAT (see below) of the request following the command. 
When TYPE is not specified, the type of the updated unit 
is taken. It is possible to uSe parameter FORMAT to 
override the default values provided. The following table 
gives these default values (refer to FORMAT below for 
explanations). 

TABLE 8-3. DEFAULT VALUES 


Default FORMAT 
Langquage-type Means ) 
Fon or FORTRAN | FORTRAN Po Leu ia 


Extended COBOL pid sieeee lot ge 
FT PP 


Unified Report Program 
Generator 
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TABLE 8-3 (CONT). DEFAULT VALUES 


Ea eee 
DAT or DATASSF| Data in SSF format fo fof 1 | sofo. 


rane Gint 


~NUMBER Specifies that the resulting unit(s) are to be renumbered 
after update. [fhe initial value of the number is nl, the 
increment at each new line is n2. Default values are nl = 
10, n2 = 10. OR re ge eR 


—~END Denotes the marker to be used to specify the end of the 
requests. 


- maximum length of string is 8 characters. 
~ all characters except single quote mark are allowed 
~ if END is omitted, implicit value for string is //EOD 


- string or //EQD is mandatory. It must begin in column | of 
the record following the last update request. 


- FORMAT This parameter is used to override default derived from 
the language type or the TYPE parameter. It defines the 
position of the line number of the text and vertical form 
control fields in the record. This is defined by means of 
5 values denoted as nl, n2, n3, n4 and n5. 

-~ Line number field expands from columns nl to n2. Zero 
value denotes that no line number is present. The line 
number must be right justified in the field. Blanks are 
treated as zeroes. 


- Text field expands from columns n3 to n4. [t may overlap 
the Line number field. 


- n5 is used to specify the column in which a particular 
form control option is coded. Zero value denotes no form 
control option. Applicable codes are: 

Spacet vertically space | line before this line. 
O t double space before this line 
- : triple space before this line 


+ : do not vertically space before this line 


| : skip to top of page with this line. 
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-~ Character * may be used to denote variable length fields. 


If n2 = *, line number terminates at first non-digit 
character. 

If n3 = *, text field begins with the first non-digit 
character on input record except when this first non-digit 
character is a space. 


If n4 = *, text continues until end of record. Neither nil 
nor n5 may be *. 


- CONTCHAR The character defined by parameter CONTCHAR is considered 


as a continuation mark if it is the last significant 
character of an update card. This option may be used 
simultaneously with ENDCHAR (see below). 


- ENDCHAR The character defined by parameter ENDCHAR is considered 


as an end of record delimiter if it is the last 
Significant character of an update card. This option may 
be used simultaneously with CONTCHAR (see above). When 
ENDCHAR is specified, all update cards must terminate with 
the specified character. 


Keywords: 


~REPLACE Allow the updated member(s) to replace (overwrite) 


Rules? 


1. 


member(s) with the same name. 


~ if the specified or selected library is LIB and NEW is 
not stated, REPLACE need not be specfied. 


- REPLACE may be used even if no previous member with the 
resulting name exists in LIB. 


Member-name-l is the name of the member to which the 
modification requests are to be applied. This member is found 
by means of the search-rules, unless a library keyword is 
specified. 


Name of the resulting member in LIB is member-name2 if 
narameter NEW is used, otherwise it is member-name-I 


The language type is the one stored in the members 
identification record. The FORMAT parameter may be used to 
override the default format associated with the stored type 
or the one specified by parameter TYPE. 


The UPDATE requests are ended with //EQD if no END parameter 
is specified: otherwise, by ’string’ appearing in column |! of 
a request record. 


The command may be parameterized. 
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Requests? 


1. 


4. 


Requests are interpreted according to the FORMAT parameter or 
to default values derived from TYPE or the unit type stored 
in its identification. 


Requests and member-name-! must be sorted on their line 
numbers in non=-descending order. 


If no request is given, the only effect of the command is to 
replace the language type stored in the unit identification 
with the one given by TYPE. 


An update line whose number matches one or several lines in 
member~name-! replaces the matched lines. Several update 
lines with equal line numbers are merged in sequence. 


An update line with a line number that does not match a line 
number in member-name~-! is added to the source member in 
sequence (after the inserted lines if any). 


An update line with string "$:D" in the first three positions 
of the text field causes the matched line(s) to be deleted. A 
range of lines may be deleted by placing the number of the 
last line to be deleted after the "$:D" . Intervening spaces 
are allowed} nothing else can appear on the update line. 


An update line with line number field blank is assumed to 
have the same number as the previous update line. The line 
will be given number zero in the updated unit. 


Examples’ 


~ UPDATE UNIT!I, NEW = UNIT2, REPLACE, NUMBER, TYPE = COBOL 3 


~44230 REPLACED LINE 
66241 INSERTED LINE 
¥¥K250 $2D 

¥46310 $2D420 

//EOD 


UNIT! is found by search rules. The resulting unit in LIB 
will be named UNIT2 and renumbered starting at 10 with 
increment 10. 

Line 230 of UNIT] is replaced, line 241 is inserted after 
line 240 of UNITI, line 250 and lines 310 to 420 are 
deleted. 


- UPDATE UNIT!, FORMAT = (1,2, 3, *), END = “FINY , CONTCHAR 
= FHS 3 


25 FIRST PART OF REPLACED LINE # 


WHICH CONTINUES ON # 
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THE FOLLOWING UPDATE # 
RECORDS 

35 $2D 

FIN 


Line number 25 is replaced, line 35 is deleted. 
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UPPER 


Function? 


Convert source language library unit(s) into upper case letters. 


Formats 
eee eee ee ee SE ———————— 
i 
INLIBI 3 star-convention 
| INLIB2 3 Member-name [, NEW = member-name-2 ] 
UPPER INLIB3 8) || 1] Jlimited-star-convention-1 


[. NEW = limited-star-convention-2 | 
LIB : (explicit-name-list) 
<indirect-name-list> 


[, REPLACE ]3 
Parameters? 
~NEW Specifies tne new name(s) to be given to the converted 
unit(s). 


- FROM, TO may be used with star-convention or 
limited=-star-~-convention. 


Keywords : 


-REPLACE Allow the unit(s) being written in output library LIB to 
replace (overwrite) an existing unit of the Same name. 


- if the specified or selected library is LIB, and if NEW 
is not specified, REPLACE need not be stated. 


~- REPLACE may be used even if no member with the same name 
exists in LIB. 


Rules? 


1. When member-name is used, search rules apply unless a library 
keyword is specified 


2. When star-convention, limited-star-convention, explicit or 
indirect name list is used, default library is LIB unless a 
library keyword is specified 


3. The command may be parameterized. 


Exampless 
UPPER LIB t MEMBER $% 


UPPER INLIB3 & <MYLIST> $ 
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SECTION IX 


COMMANDS APPLICABLE TO CU LIBRARIES 


The following is a description of the commands that are applicable 
to Compile-Unit (CU) libraries. 


A Compile-Unit library contains a number of members, each one being 
the result of a compilation. A CU has a name, which is generally the 
name of the compiled program or procedure. It may have alternate 
names to denote secondary entry points or, more generally, any 
catalogued external symbol definition. These alternate names are 
known as "aliases". An alias may be used in lieu of the Compile-Unit 


name and refers to the same entity. 


Compile units have an identification in their own right. This will 
be displayed each time that a unit is handled by LIBMAINT. 


Commands are presented in alphabetical order and each description 
Starts at the top of a page. 


Par 


a OP 


Rul: 


Exar 


MOVE 


Function: 
- Move one or more CUs from COMFILE to a CU library. 


- Move one or more CUs from a library to another CU 
sequential file. 


~ Move one or more CUs from a sequential file to a C 


Format: 


INLIBI 3 member—-name 


INLIB2 8 star-conventi 
MOVE INLIB3 8 4 (explicit-name 

LIB 

COMFILE 8 

INFILE 38 


[»END = “string’] [,REPLA 


—- FROM, TO may be used with star-convention. 


- END Denotes the end marker for input cards in COMFI 
- Maximum length of string is 8 characters. 


- All characters except single quotation mark ( 
allowed. 


~ If END is omitted string ’//EODY is assumed. 


~ When COMFILE is used, string or //EOD is mand 
must appear in column |! of the record followi 
input card. 


Keywords? 


- REPLACE Allow the unit being written in output librar 
replace (overwrite) an existing unit with th 


- When output is to OUTFILE, this keyword is 
the command will operate regardless of whe 
permission is given or not. 


- REPLACE may be used even if no member with 
name exists in LIB. 


Rules: 


26 


6. 


When member-name is used, Search rules apply, unless a 
library keyword, COMFILE or INFILE is specified. 


When star-convention or explicit name list is used, default 
library is LIB unless a library keyword, COMFILE or INFILE is 
specified. 


Library keyword LIB cannot be specified when LIBMAINT 
assigned output is OUTFILE. 


When COMFILE is used, only member-name or * may be used (i.e. 


select one or all units in the following deck of cards). 


When COMFILE is used, each CU entered on cards begins with a 
CU header holding the name of the unit and ends with an “ECU? | 
card. This is the format of the deck which would he produced 
by the PUNCH command. 


The command may be parameterized. 


- MOVE COMFILE 2 *, END = “FIN? $§ 


! card for CUl 


ECU 
cards for CU2 


ECU 


FIN 


Store CUs read from cards into LIB. 


- MOVE INLIB2 & “THB*, TQ = HCOBOL, REPLACE $3 


- MOVE INFILE 3: UNIT! 3 


PUNCH 


Function? 
Punch one or more CU(s) of a CU library. 


Format: 


INLIB2 3 = star-convention 


INLIBI 3 member—name 
Cexplicit-name-list) ; 


PUNCH INLIB3 8 
LIB 3 


Parameters? 


- FROM, TO may be used with star-convention. 


Rules 


1. When member-name is specified, search rules apply unless a 
library keyword is stated. 


2. When sStar-convention or explicit name list is used, default 
library is LIB unless a library keyword is specified. 


3. The command may be parameterized. 


PUNCH INLIB2 & ALPHA 3 


PUNCH LI83 8 *, FROM = ALPHA, TO = OUEGA 3§ 


SECTION X 


COMMANDS APPLICABLE TO LM LIBRARIES 


The following is a.description of the commands that are applicable 
to Load Module (LM) libraries. 


A Load-Module library contains a number of members, each member 
being the result of the linkage of one or more Compile Units (CU) to 
produce an executable module acceptable by the GCOS-64 loader. 


Load modules have an identification in their own right. This will be 
displayed each time that a unit is handled by LIBMAINT. 


Commands are presented in alphabetical order and each description 
Starts at the top of a page. 
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MOVE 


Function: 


- Move one or more LMs from the command input stream to a Li 
library. 


- Move one or more LMs from a LM library to another LM libr. 
sequential file. 


~ Move one or more LMs from a sequential file to a LM libra 


Format? 


INLIBI 3 member—name-—! [.NEW=member-name- 
INLIB2 8 star-convention 
MOVE || INLIB3 ? limited-star-convention-! ; 
“] [NEW=limited-star-convention-2. 
LIB 3 
COMFILE ¢ (explicit-name-list) 
INFILE 2 


[END = “string’] [,REPLACE | 3 


Parameters? 


- NEW Specifies the name(s) of the resulting member(s); tt 
may be used with member-name or limited-star-convent 
It may not be used when keyword COMFILE is present. 


- FROM, TO May be used with star-convention and 
limited-star-convention. 


~- END Denotes the end of a sequence of input cards on COMI 


—- maximum length of string is 8 characters. 

- all characters except single quotation mark(’) are 
allowed. 

- if END is omitted, implicit value for “string’ is 
“//EOD?%. 

-~ when COMFILE is specified, either //EQD or string 
mandatory and must appear in column one of the rec 
immediately following the last input card. 


Keywords’ 


- REPLACE Allow the member being written onto [.IB to replace 
(overwrite) an existing member with the same name. 


- When LIBMAINT assigned output is OUTFILE, REPLACE 


ignoreds the command operates regardless of whethe 
REPLACE permission is given or not. 
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~- REPLACE may be used even if the resulting member name 
does not exist in LIB. 


Rules: 

1. When member~name-! is Specified, search rules apply unless a 
library keyword, INFILE or COMFILE is stated. 

2e When star-convention or explicit name list is used, default 
library is LIB unless a library keyword, COMFILE or INFILE is 
specified. 

3. Library keyword LIB cannot be specified when LIBMAINT 
assigned output is QUTFILE. 

4. When COMFILE is used, only member-name-! or * may be used 
(i.e.2 select one or all units in the following deck of 
cards). 

5. When COMFILE is used, each LM entered on cards begins with a 
LM header holding the name of the unit and ends with an “ELM” 
card. This is the format of the deck which would be produced 
by the PUNCH command. 

6. The command may be parameterized. 

Exampless 


~- MOVE COMFILE 2 *, END = “FINY 3 


cards for LM] 
ELM 
cards for LM2 


ELM 


FIN 


Store LMs read from cards into LIB. 


- MOVE INLIB2 8 PROC*, NEW = P*NEW, REPLACE $ 


- MOVE INFILE * *, FROM = ALPHA, TO = OMEGA, REPLACE $ 
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PUNCH 


Function: 


Punch one or more LM(s) of a LM library. 


Format: 


INLIBI 8! member=name 
INLIB2 3 star-convention 


INLIB3 3 (explicit-name-list) 
LIB 3 


Parameters? 


—- FROM, FO may be used with star-convention. 


Rules: 


1. When member~-name is Specified, Search-rules apply unless a 
library keyword is used. 


2. When star-convention or explicit name list is used, default 
library is LIB unless a library keyword is specified. 


3. The command may be parameterized. 


Examples? 
PUNCH INLIB2 & *NEW 3¢ 
PUNCH PROG*3, FROM = PROGX3 $ 
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Functions 


Change the name of one or more LM(s) in LIB. 


Formats 


member=name~1, [NEW =| member-name-2 
RENAME [LIB?] ; 
[AJiimited-star-convention-!, 
[ NEW =] limited-star-convention-2 


Parameters? 
~ NEW introduces the new name(s) of the renamed member(s). 


~- FROM, TO may be used with limited-star-convention. 


Rules’ 


RENAME 


1. New member name(s) must not exist in LIB $ REPLACE parameter 


is not allowed. 
2. Renamed members must exist in LIB. 


3. The command may he parameterized. 


Examples: 
RENAME LIB * PLMx, NEW = QLM*NEW $ 


RENAME *, *_NEW $ 
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SECTION XI 


COMMANDS APPLICABLE TO SM LIBRARIES 


The following is a description of commands that are applicable to 
Snarable modules (SM) libraries. A SM library contains a number of 
members, each one being a SM. A SM contains in turn a number of 


members, each one being a Linked Unit (LKU). 


The name of each member must be unique and must not exceed 30 
characters in length. 


A SM is the result of the linkage of LKU or of a LIBMAINI command. A 
LKU is the result of the linkage of one or more compile units that 


specify the containing SM. 


Each description starts at the top of a page. 
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DELETE 


Functions 


To delete a SM and its associated LKUs in SM library LIB. 


Formats 


DELETE SM = sm—name_ 3 


Example: 


DELETE SM = MYSM $ 
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INIT 


Functions 


To initialize a SM in SM library LIB. 


Format? 
ie } 


E 
INIT SM = smname, STN -} ! , ESSTE = hexa-2 [,REPLACE ] 3 
| F | 


Parameters? 
- SM gives the name of the SM to be initialized. 
- STN indicates the SIN associated with the SM. 


- ESSTE gives the Entry Segment STE 3 this is an hexadecimal value 
limited to FF. 


Keywords? 
~ REPLACE is needed if an existing SM with the same name already 


exists in LIB. 


Examples 


INIT SM = MYSM, STN = F, ESSTE = O09, REPLACE $ 
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LIST 


Functions 


To list part or all of a SM LIB or INFILE contents. 


Formats 


LIST [INFILE,] [ DETAILED] 


| 


* 
lku-name 


Parameters and keywords: 


~ INFILE Specifies that the INFILE contents are to be listed. If 
not present, the LIB contents are listed. 


DIR or * To list the SMs and their associated LKU names. 


- SM List the characteristics of a specified (sm-name) or all 
(*) SM Ss. 


DETAILED With SM = *, the associated LKU list is printed + with SM |( 
= sm-name, the associated LKU name list and the entry 
points are listed (this latter combination is not allowed 
with INFILE). 


~ LKU Specifies the name of the LKU to he listed. Listed 
information includes segment number of private data and 
entry points (not allowed with INFILE). 


Examples: 


- LIST * 3 

- LIST DIR $ 

- LIST INFILE, * 3 

- LIST INFILE, SM = MYSM 3 

- LIST INFILE, SM = *, DETAILED 5 
- LIST SM = *, DETAILED § 

- LIST LKU = MYLKU 3 

~ LIST SM = MYSM, DETAILED § 


Functions 


LOAD 


To load one or all SMs from SM library LIB into backing store. 


rormat: 


SM 


fParnene| 


[, DEBUG | Ee REPLACE]$ 


Parameters and Keywords? 


ae 


= DEBUG 


EPL ACE 


Pules? 


If SM = * all SMs are loaded 3 otherwise the name of the 
SM to be loaded is given. 


Specifies that the SM is to be accessed hy the Program 
Checkout Facility (PCF) during the execution of a LM 
referencing the SM. A SM loaded with option DEBUG may not 
be shared hetween process groups. To suppress the DEBUG 
option, the SM has to be CANCELIled and reLOADed without 
this option. 


Is needed if a SM with the same name exists, after having 
heen loaded from the same library. 


It is not allowed to load a SM from TEMP. SMLIB 


Examples 8 


LOAD SM = MYSM, DEBUG 3 

LOAD SM = *® 3 

LOAD SM = *, DEBUG 3 

LOAD XM = MYSM, REPLACE, DEBUG 3 
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MOVE 


Functions 


| 


To move one or all SMs of SM INLIBI or INFILE onto LIB.or OUTFILE. 


Formats 


MOVE [ INFILE, ] [,REPLACE ] 3 
* 


Parameters and Keywords? 
- INFILE if specified, SMs are moved from INFILE$ if not 
specified, they are moved from INLIBI. 


- SM states the name of the SM to be moved. If * is specified, 
all SMs will be moved. 


- REPLACE is needed to overwrite an existing SM with the same name 


in LIB. This keyword is not allowed {f LIBMAINT assigned 
output is OUTFILE. 


Examples? 


MOVE INFILE, SM = * ,REPLACE § (INFILE to LIB) 


- MOVE SM = * $ C(INLIB to LIB or QOUTFILE) 
- MOVE SM = MYSM, REPLACE 3 (INLIB! to LIB) 
- MOVE INFILE, SM = x3 (INFILE to LIB or QUTFILE) 
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UNLOAD 


Function’ 


To clear the backing store of all information associated with a 
specified SM. 


Cee men 


>a 
rut inave 


UNLOAD SM = sm-name, SMLIB = smlib—name 3 
Parameters: 
~ SM gives the name of the SM as specified when the SM was 


initialized. 


- SMLIB states the name of the SM library from which the SM has 
been loaded into backing store. 


Examples 


UNLOAD SM = MYSM SMLIB = MYLIB 3 
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SECTION XII 
THE TEXT EDITOR 


The TEXT EDITOR can be used to create, modify or edit an EBCDIC 
source unit in SSF format. 


USAGE 


The layout of the input to a text editor session is as follows 8 


EDI T-command 


specific edit requests 


—_ 


Once the EDIT command is activated, all following records in the 
input stream are treated as editor requests until a Q (quit) is 
encountered. Requests fall into two general categories ! input 
requests and edit requests. Input requests place the editor into 
inout mode which allows the following EBCDIC records to be entered 
as new text until an appropriate escape sequence is read to switch 
the editor back into edit mode. Edit requests allow the user to read 
and write source units and to perform various simple or complex: 
editing functions on their contents. Input and editing operations 
are not performed directly on the target units, but in a temporary 
buffer known as "Workspace". 


REQUESTS 


In the following list, the editor requests are divided into three — 
categories ! input requests, basic edit requests and extended edit 
requests. The basic edit requests are sufficient to allow a user to 
create and edit EBCDIC units and provide a good functional 
capability. Extended requests may be more time consuming but allow 
additional capability. 
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Input Requests 
A - (append) « Enter input mode, append the following lines after 
specified line until the eScape sequence is read. 


C =~ (change) * Enter input mode, replace the specified line or lines 
with the following lines until the escape sequence is read. 


I - (insert) ! Enter input mode, insert the following lines before a 
specified line until the escape sequence is read. 


Basic Edit Requests 


D —- (delete) : Delete specified line or lines from the workspace. 
P - (print) : Print specified line or lines. 


L - (print with line number) : Print specified line or lines 
prefixed with their internal line numbers. 


Q- (quit) 8 exit from the text editor. 
R - (read) : Read specified unit into workspace. 


S - (substitute) ! Replace specific character strings in specified 
line or lines. 


W- (write) # Create a new unit with the contents of the edited 
workspace. 


Z - (forced write) : Create a new unit with the contents of the 
edited workspace. 


N = (no operation) Do nothing. 


# - (count lines) : Count the number of lines with the specified 
content and print the result. 


Extended Edit Requests 


- (print line number) : Print the line number (contained in the 
SSF header) of specified line. | 


G - (global) # Print, delete, print with the line number or print 
line number of all addressed lines that contain a specific 
character string. 


V — (exclude) %& Print, delete, print with the line number or print 
line number of all addressed lines that do not contain a 
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Specific character string. 


(copy) # Copy specified line or lines into a specified auxiliary 
workspace. 


(move) * Move specified line or lines into a specified auxiliary 
workspace. 


(status) : Print a summary status of all workspaces currently 
used. 


(top of page) ! Skip to top of page in the TEXT EDITOR output 
report. 


(file output) : Alter the report output to the specified 
workspace. 


{end file output) * Revert the report output to the normal 
default device. 


(output message) * Print the remainder of the line on the output 


report. 


(define label) : Set a label on this line for reference in a 
goto (>) request. 


(listing control) t Allow variations in the contents of the 
editors report. 


(split line) * Split all lines containing a given pattern. 


(concatenate lines) : Concatenate all lines containing a given 
pattern with the immediately preceding ones. 


(backwards search) : Search for target line hackwards. 


(goto) * Skip n request lines or goto n request lines backwards 
or goto specified label. 


(test contents) t: If line contains the given string then execute 
the remainder of the request line, otherwise skip to next 
request line. 


(range test) t If current line is in specified range then 
execute the remainder of the request line, otherwise skip to 
next raquest line. 


ADDRESS ING 


The TEXT EDITOR is basically a line-oriented editor in that editing 
requests uSually operate on an integral number of lines. AS a 
result, most editing requests are preceded with an address 
specifying the line or lines in the workspace on which the request 
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is to operate. There are three basic means by which lines in the 
workspace can be addressed. 


~ addressing by line number 
~ addressing relative to the "current line" 
- addressing by context 


In addition, an address can be formed using a combination of the 
above techniques. 


Addressing by Line Number 


Each line in the workspace can be addressed by a decimal number 
indicating its line number as contained in its SSF header. 
Search for the target line is made sequentially from the 
"current line” to the last line of the workspace, then from the 
first line of the workspace to the one immediately preceding 
the "current line". Lines which are added to the workspace are 
given line number 0. Lines which are modified keep their 
original numbering. 


Addressing Relative to the Current Line 


The editor maintains the notion of a “current line" that Is 
addressable by using the character "." (period) to represent 
the address of the current line. Normally, the current line is 
the last line addressed by an edit request or the last line 
entered by an input request. The value of "." after each editor 
request is documented in the description of the request and in 
the summary of requests at the end of this section . 


Lines can be addressed relative to the current line number by 
using an address consisting of "." followed hy a signed decimal 
number specifying the position of the desired line relative to 
the current line. For example the address ".+1" specifies the 
line immediately following the current line and the address 
".-!l" specifies the line immediately preceding the current 
line. 


When specifying an increment to the current line position, the 
"+" sign can be omitted (e.g. ".5" is interpreted as ".+5"), In 
addition, when specifying a decrement to the current line 
position, the "." itself can be omitted (e.g. "-3" is 
interpreted as ".-3). 

Two symbols are used to denote respectively the first and last 
line of a workspace. 


~ ""]" denotes the first line t hence “ 1+!" would denote the 
second line and " ]+i" the (i+l)th. line of the workspace. 
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~ "S"denotes the last line of the workspace, hence "$=!" would 
address the last but one line, etc... 


Addressing by context 


Lines can be addressed by context by using a regular expression 


wre See 


a 
to match a string of characters on a line. When used as an 
address, a regular expression specifies the first line 
encountered that contains a string of characters that matches 
the regular expression. 


For example, in the following text the regular expression 
"/ABC/" matches line 2. 


A ? PROCEDURE $ 
ABC : DEF 3 

xX = Y $ 
END A $ 


To use a regular expression as an address, the user enters 
“/regexp/", where "regexp" is any valid expression as described 
below. The search for a regular expression begins on the line 
following the current line (i.e. .+!) and continues through the 
entire workspace, if necessary, until it again reaches the 
current line. In other words the search proceeds from ",+i" to 
"S$" and then from "|" to ".", If the search is successful, 
"/regexp/" specifies the first line encountered during the 
Search in which a match was found, 


A regular expression can consist of any character in the EBCDIC 
Set. However the following characters have specialised meaning 
in regular expressions. 


Wfn 
Ih ye 


won 


tga 


delimits a regular expression used as an address$ 

signifies "any number (or none) of the preceding character" 3 
when used as the first character of a regular expression, the 
wy" character signifies the virtual character preceding the 

first character on a line 3 

when uSed as the last character of a regular expression, the 

"s character signifies the virtual character following the 

last character on a line 3 


matches any character on a line. 
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Some examples follow 


SAS Matche 
SABC/ Matche 
/AB*C/ Matche. 
line 
JIN. TOS Matche. 
charac 
JIN XIO/ Matche 
/ABC/ Matche. 
SABCS/ Matche. 
/IABC. *DEF$/Matche 
1 ox/ Matche 


The special meaning o 
expression can be nul 


"¢C", Thus 8 
SECSECH/S Matche 
“tC V/ Matche 


The editor remembers 

context. The user can 
using a null regular 

expression can be fol 
manner as when addres 
the addresses “/ABC/+ 
second line following 


Note that the two use 
and (2) as Special ch 
distinguished by cont 


Compound Addresses 


An address can bi 
described above. 
guide in the fori 


- if a line numb: 
first componen: 


Specifies a series of two lines, th 
current line through the second lin 


However, if a semi-colon is used to 
of a comma, the value of "." is set 
addressed by al before the evaluati 
to the example given immediately ab 


018.2 
specifies a series of three lines, 
-following the original current line 
following the line specified by al. 
address pair 3 

/ABC/3 +1 
is equivalent to the address pair : 


/ ABC/, /ABC/. 


Addressing Errors 


The following list describes the various 
the editor is attempting to evaluate an. 


“WORKSPACE EMPTY" — an attempt has |! 
specific line when the workspace is 
are legal addresses within an empty 
with a read, append or insert reque: 


"ADDRESS NEGATIVE” or "ADDRESS TOO | 
made to refer to a non-existent lin 
when there are fewer than 20 lines . 
address of “I- 4). 


“ADDRESS WRAP AROUND" = an attempt |! 
series of lines in which the positic 
addresses is before the line addres: 
(e.ge Sq 1). 


"SEARCH FAILED" - a regular express: 
Search initiated from the request s| 
matching line. 


"SYNTAX ERROR IN REG=EXP" = a regulé 
address has not been properly delim} 


"//UNDEFINED" - a null regular expre 
previously defined regular expressic 
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USE OF THE EDITOR 


Request Format 
A request to the editor can take any one of the following forms 
depending on the number of addresses to be specified with the 
request 
<request> 
adr <request> 
adr} ,adr2<request> 
adr! sadr2<request> 


adr, adr! and adr2 are any legal address as specified above, 
and request is any valid editor request. 


Some editor requests require no address, some require a single 
address and others require a pair of addresses. In all cases, 
however, the user can use a request omitting one or both of the 
required addresses and let the editor provide the missing 
address information by default. The following rules apply to 
the use of addresses specified by default 
~ if a request requiring an address pair is issued with the 
second address missing, the (missing) Second address is 
assumed to be the same as the first. For examples 
adr<request> 
is interpreted as: 
adr,adr<request> 


and addresses a single line in the workspace (i.e. the line 
addressed by adr) 


-~ if a request requiring an address pair is issued with both 
addresses missing, one of the following address pairs is 
assumed depending on the request issued: 
ese <request> for most editor requests 
1,$ <request> for write, forced write, global and exclude 
- if a request requiring a single address is issued with no 
address specified, one of the following addresses is assumed . 
depending on the request issued 
| « <request> for most editor requests 


$ <request> for read requests 
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The Value of “." 


All editor requests that alter the contents of the workspace or 
cause information to be output change the value of “." (i.e. 
the current line). Usually, the value of ".“" is set to the last 
line address specified (either explicitly or by default) in the 
editor request. The one major exception to this rule is the 
delete request which sets "." to the line after the last line 
deleted. 


Multiple Requests on a Line 


In general, any number of editor requests can be issued in a 
Single input line. However, each of the requests listed below 
must terminate a line and, thus, must appear on a line by 
itself or be placed at the end of a line containing multiple 
editor requests. . 


R read 

Wand Z write and forced write 
A,C and I input requests 

Q quit request 


Spacing 
The following rules govern the use of Spaces in editor 
requests? 


~ spaces are taken as literal when appearing inside regular 
expressions: thus, /THE N/ is not the same as /THEN/ 


~ spaces cannot appear in numbers, i.e. 13 cannot be written 
as | 3 (which is interpreted as 1I+3) 


-~ spaces within addresses, except as indicated above, are 
ignored 


- the treatment of spaces in the body of an editor request 
depends on the nature of the request 


Comments 


The quotation mark character (") is reserved as the comment 
delimiter and is actually implemented as an editor request, the 
effect of which is to ignore the remainder of the request line. 
If the quotation mark is preceded by an address, the value of 
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uo" is set to that address. 


The Locate Request 


If an address terminates a request line, the value of ".” is 
set to the addressed line and the line is printed. For example 


the request lines 
SISTARTZ 


locates a line beginning with START, sets the value of "." to 
that line and prints it. 


Responses from the Editor 
a ed al are Ne lel ahi 


In general, the editor does not reSpond with output unless 
explicitly requested to do so (e.g. with a print line number 
request). | 


The use of frequent print requests is recommended for users 
using the editor for the first time. 


If an error is encountered by the editor, an error message is 


printed and a skip to the next request line is made. Thus the 
trailing part of the offending request line is ignored. 
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INPUT MODE 


The editor can be placed in input mode with the use of one of the 
three input requests (append, change and insert). The input request 
must terminate a request line. It is followed by a number of literal 
text lines. 


The literal text can contain any number of EBCDIC source lines. To 
exit from input mode and terminate the input request, the escape 
sequence ¢F is entered as the first character of a new line. The 
usual form of an input request is as follows: 


adr! [{,adr2)<input request> 


text 


ov 


It is important to remember to terminate the input request with the 
¢r escape before entering another request. (Otherwise the (would be) 
editor request is regarded as input and included in the text rather 


than executed as a request. 


Upon leaving input mode, the value of "." is set to the last input 
line. The special meaning of any of the escape sequences used by the 
editor (e.g.¢F,¢C,¢B and ¢X) can be suppressed by inserting the ¢C 
escape sequence betwen the two characters (e.g.¢¢CF,¢¢CC,¢¢CE.¢¢CXx), 
thus allowing the eScape sequence to be input as literal text. All 
input lines entered are assigned line number zero and should 
therefore be later addressed by context or relative addressing 
rather than by line number. 
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Specific character string. 


(copy) ! Copy specified line or lines into a specified auxiliary 
workspace. 


(move) 8: Move specified line or lines into a Specified auxiliary 
workspace. 


(status) : Print a summary status of all workspaces currently 
used. 


(top of page) ! Skip to top of page in the TEXT EDITOR output 
report. 


(file output) t: Alter the report output to the specified 
workspace. 


(end file output) * Revert the report output to the normal 
default device. 


(output message) * Print the remainder of the line on the output 


report. 


(define label) ? Set a label on this line for reference in a 
goto (>) request. 


(listing control) t Allow variations in the contents of the 
editors report. 


(split line) * Split all lines containing a given pattern. 


(concatenate lines) ! Concatenate all lines containing a given 
pattern with the immediately preceding ones. 


(backwards search) * Search for target line backwards. 


(goto) * Skip n request.lines or goto n request lines backwards 
or goto specified label. 


(test contents) : If line contains the given string then execute 
the remainder of the request line, otherwise skip to next 
request line. 


(range test) t: If current line is in specified range then 
execute the remainder of the request line, otherwise skip to 
next request line. 


ADDRESS ING 


The TEXT EDITOR is basically a line-oriented editor in that editing 
requests usually operate on an integral number of lines. AS a 
result, most editing requests are preceded with an address 
specifying the line or lines in the workspace on which the request 
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is to operate. There are three basic means by which lines in the 
workspace can be addressed. 


- addressing by line number 
- addressing relative to the "current line" 
- addressing by context 


In addition, an address can be formed using a combination of the 
above techniques. 


Addressing by Line Number 


Each line in the workspace can be addressed by a decimal number 
indicating its line number as contained in its SSF header. 
Search for the target line is made sequentially from the 
"current line” to the last line of the workspace, then from the 
first line of the workspace to the one immediately poreceding 
the "current line". Lines which are added to the workspace are 
given line number 0. Lines which are modified keep their 
original numbering. 


Addressing Relative to the Current Line 


The editor maintains the notion of a “current line" that Is 
addressable by using the character "." (neriod) to represent 
the address of the current line. Normally, the current line is 
the last line addressed by an edit request or the last line 
entered by an input request. The value of "." after each editor 
request is documented in the description of the request and in 
the summary of requests at the end of this section . 


Lines can be addressed relative to the current line number by 
using an address consisting of "." followed hy a signed decimal 
number specifying the position of the desired line relative ta 
the current line. For example the address ".+]" specifies the 
line immediately following the current line and the address 
".-!l" specifies the line immediately preceding the current 
line. 


When specifying an increment to the current line position, the 
“+" sign can be omitted (e.g. ".5" is interpreted as ".#5"). In 
addition, when specifying a decrement to the current line 
position, the "." itself can be omitted (e.g. "-3" is 
interpreted as ".-3). 

Two symbols are used to denote respectively the first and last 
line of a workspace. 


- ""]" denotes the first line s hence ™ 1+!" would denote the 
second line and “ |+i" the Cit])th. line of the workspace. 
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-~ "S"denotes the last line of the workspace, hence "S=!I" would 
address the last hut one line, etc... 


Addressing by context 


Lines can be addressed by context by using a regular expression 
to match a string of characters on a line. When used as an 
address, a regular expression specifies the first line 
encountered that contains a string of characters that matches 
the regular expression. 


For example, in the following text the regular expression 
"/ABC/" matches line 2. 


A * PROCEDURE 3 
ABC t DEF $3 

xX = ; 

END A $ 


To use a regular expression as an address, the user enters 
“/regexp/", where "regexp" is any valid expression as described 
below. The search for a regular expression begins on the line 
following the current line (i.e. .+!) and continues through the 
entire workspace, if necessary, until it again reaches the 
current line. In other words the search proceeds from ",+i" to 
"S$" and then from " ]" to “.", If the search is successful, 
"/regexp/" specifies the first line encountered during the 
Search in which a match was found, 


A regular expression can consist of any character in the EBCDIC 
set. However the following characters have specialised meaning 
in regular expressions. 


"/" delimits a regular expression used as an address} 


"ke" signifies "any number (Cor none) of the preceding character" 3 


"1" when used as the first character of a regular expression, the 
wy" character signifies the virtual character preceding the 
first character on a line 3 


"s" when used as the last character of a regular expression, the 


"s character signifies the virtual character following the 
last character on a line 3 


"J" matches any character on a line. 
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Some examples follow 3 


/A/ Matches the letter A anywhere on a line 

SABC/ Matches the string ABC anywhere on a line 

JAB*¥C/ Matches AC, ABC, ABBC, ABBBC, etc... anywhere on a 
line 


JIN LOS Matches a line containing IN followed by any tvio 
characters followed by TO 


JIN*TO/ Matches a line containing IN and TQ in that order 

J 1ABC/ Matches a line beginning with ABC 

/ABCS/ Matches a line ending with ABC 

7 T1ABC.*DEFS/Matches a line beginning with ABC and ending with DEF 

1 */ Matches any line 
The special meaning of "7", “el, 44s") WH and "4." within a regular 
expression can be nullified by preceding the sSpectal character with 
"¢C",. Thus 8 

/EC/ECK/ Matches the string /* anywhere on a line 

“tC 1/ Matches any line containing the character 1] 
The editor remembers the last regular expression used in any 
context. The user can reinvoke the last used regular expression by 
using a null regular expression (i.e"//"). In addition, a regular 
expression can be followed by a signed decimal integer in the same 
manner as when addressing relative to the current line. For example, 
the addresses “/ABC/+5-3", "/ABC/+2" or "/ABC/2" all address the 
second line following a line containing ABC. 
Note that the two uses of ".", "J" and "Ss" (1) as line addresses 


and (2) as special characters in regular expressions) are 
distinguished by context. 


Compound Addresses 


An address can be formed using a combination of the techniques 
described above. The following rules are intended as a general 
guide in the formation of these compound addresses. 


- if a line number is to appear in an address, it must be the 
first component of the address. 
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- a line number can be followed by a regular expression. This 
construct is used to begin the regular expression search 
after a specific line number. For example, the address 
"!O/ABC/" starts the search for “/ABC/" immediately after 
line number 10. 


~- a regular expression can follow an address specified relative 
to the current line number. For example, the address 
".-8/ABC/" starts the search from 8 lines preceding the 
current line. 


- a regular expression can be followed by another regular 
expression. For example, the address "/ABC//DEF/" matches the 
first line containing DEF appearing after the first line 
containing ABC. AS mentioned earlier, a regular expression 
can be followed by a decimal integer. For example, the 
address “/ABC/~!O0/DEF/5" starts the search for "/DEF/" from 
10 lines preceding the first line to match "/ABC/" and, if 
"/DEF/" is matched, the value of the compound address is the 
fifth line following the line containing the match for 
“/DEF/". 


Addressing a Series of Lines 


Several of the editor requests can be used to operate on a 
series of lines in the workspace. To specify a series of 
lines, two addresses muSt he given in the following general 
form. 


.al,a2 
The pair of addresses specifies the series of lines starting 
with the line addressed by the address a! through the line 
addressed a2 inclusive. 
Examples 3 
1,5 specifies from line number |! through line number 5 
‘1, $ specifies the entire contents of the workspace 
-!,7ABC/ specifies the line following the current line 
through the first line after the current line 
containing ABC 
When a comma is used to separate addresses, the address 
computation of the second address is unaffected by the 
computation of the first address (i.e. the value of "." is not 
changed by the evaluation of the first address). For example, 
the address pair 3 


ole2 
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Specifies a series of two lines, the line immediately after the 
current line through the second line after the current line. 


However, if a semi~colon is used to separate addresses instead 

of a comma, the value of "." is set to point to the line 

addressed by al before the evaluation of a2 begins. In contrast 

to the example given immediately above, the address pair ! 
eol%e2 


specifies a series of three lines, the line immediately 


following the original current line through the second line 


following the line specified by al. As a further example, the 
address pair 3 


/ABC/3.+10 
is equivalent to the address pair 3 
/ABC/,7ABC/+10 


Addressing Errors 


The following list describes the various errors that can occur when 
the editor is attempting to evaluate an address. 


"WORKSPACE EMPTY" -— an attempt has been made to reference a 
specific line when the workspace is empty. (Only "S$" and ")" 
are legal addresses within an empty workspace and only if used 
with a read, append or insert request.) 


"ADDRESS NEGATIVE" or “ADDRESS TOO BIG" ~- an attempt has been 
made to refer to a non-existent line (e.g. an address of “1+ 20 
when there are fewer than 20 lines in the workspace or an 
address of “I- 4). 


“ADDRESS WRAP AROUND" = an attempt has been made to address a 
series of lines in which the position of the second line 
addresses is before the line addressed by the first address 
(e.ge Sq 1). 


“SEARCH FAILED" - a regular expression search or a line number 
Search initiated from the request stream has failed to find a 
matching line. 


"SYNTAX ERROR IN REG-EXP" = a regular expression used as an 
address has not been properly delimited. 


"//UNDEFINED" - a null regular expression has been used and no 
previously defined regular expression {is available. 
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USE OF THE EDITOR 


Request Format 
A request to the editor can take any one of the following forms 


depending on the number of addresses to be specified with the 
request 


adr <request> 
adr] ,adr2<request> 
adr 1$adr2<request> 


adr, adr! and adr2 are any legal address as specified above, 
and request is any valid editor request. 


Some editor requests require no address, some require a single 
address and others require a pair of addresses. In all cases, 
however, the user can uSe a request omitting one or both of the 
required addresses and let the editor provide the missing 
address information by default. The following rules apply to 
the use of addresses specified by default 
~ if a request requiring an address pair is issued with the 
second address missing, the (missing) second address is 
assumed to be the same as the first. For examples 
adr<request> 
is interpreted as? 
adr,adr<request> 


and addresses a single line in the workspace (i.e. the line 
addressed by adr) 


~ if a request requiring an address pair is issued with both 
addresses missing, one of the following address pairs is 
assumed depending on the request issued: 
eos <request> for most editor requests 
1,6 <request> for write, forced write, global and exclude 
- if a request requiring a single address is issued with no 
address specified, one of the following addresses is assumed 
depending on the request issued 
| « <request> for most editor requests 


$ <request> for read requests 
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The Value of "," 


All editor requests that alter the contents of the workspace or 
cause information to be output change the value of “." (i.e. 
the current line). Usually, the value of ".“' is set to the last 
line address specified (either explicitly or by default) in the 
editor request. The one major exception to this rule is the 
delete request which sets "." to the line after the last line 
deleted. 


Multiple Requests on a Line 


In general, any number of editor requests can be issued in a 
Single input line. However, each of the requests listed below 
must terminate a line and, thus, must appear on a line by 
itself or be placed at the end of a line containing multiple 
editor requests. . 


R read 

W and Z write and forced write 
A,C and I input requests 

Q quit request 


Spacing 
The following rules govern the use of Spaces in editor 
requests! 


- spaces are taken as literal when appearing inside regular 
expressions: thus, /THE NZ is not the same as /THEN/ 


~ spaces cannot appear in numbers, i.e. 13 cannot be written 
as | 3 (which is interpreted as 1|+3) 


- spaces within addresses, except as indicated above, are 
ignored 


- the treatment of spaces in the body of an editor request 
depends on the nature of the request 


Comments 


The quotation mark character (") iS reserved as the comment 
delimiter and is actually implemented as an editor request, the 
effect of which is to ignore the remainder of the request line. 
If the quotation mark is preceded by an address, the value of { 
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"ot is set to that address. 


The Locate Request 


If an address terminates a request line, the value of "." is 
set to the addressed line and the line is printed. For example 


the request lines 
JISTARTZ 


locates a line beginning with START, sets the value of "." to 
that line and prints it. 


Responses from the Editor 
OD Bee a oe 


In general, the editor does not reSpond with output unless 
explicitly requested to do so (e.g. with a print line number 
request). 


The use of frequent print requests is recommended for users 
using the editor for the first time. 


If an error is encountered by the editor, an error message is 


printed and a skip to the next request line is made. Thus the 
trailing part of the offending request line is ignored. 
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INPUT MODE 


The editor can be placed in input mode with the use of one of the 
three input requests (append, change and insert). The input request 
must terminate a request line. It is followed by a number of literal 
text lines. 


The literal text can contain any number of EBCDIC source lines. To 
exit from input mode and terminate the input request, the escape 
sequence ¢F is entered as the first character of a new line. The 
usual form of an input request is as follows: 


adr! (,adr2)<input request> 
text 


- 


It is important to remember to terminate the input request with the 
¢F escape before entering another request. (therwise the (would be) 
editor request is regarded as input and included in the text rather 


than executed as a request. 


Upon leaving input mode, the value of "." is set to the last input 
line. The special meaning of any of the escape sequences used by the 
editor (e.g.¢F,¢C,¢B and ¢X) can be suppressed by inserting the ¢C 
escape sequence betwen the two characters (e.g.¢¢CF,¢¢CC,¢¢CE.¢¢CX), 
thus allowing the escape sequence to be input as literal text. All 
input lines entered are assigned line number zero and should 
therefore be later addressed by context or relative addressing 
rather than by line number. 
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Append Request (A) 
FUNCTIONS 
The append request is used to enter input lines from the input 
stream, appending these lines after the line addressesd by the 


append request. The append request is one of the few requests 
that can operate correctly when the workspace is empty. 


FORMAL 8 


adrA 


text 


¢F 
DEFAULY® 

A is taken to mean .A 
VALUE OF ","3 


set to the last line appended 


EXAMPLE8 
- Before ~ A 2 PROCEDURE $3 
X = Y $3 
END A $ 
- request sentence -1 + IA 
Q=R 3 
er 
~- After - A * PROCEDURE 3 
X = Y 3 
wo -> 9 = R 3 
END A 3 


Note : request $A can be used to insert new text at the end of. 
a workspace. 


12-13 


Change Request (C) 


FUNCTIONS 
The change request is used to delete an addressed line or range 
of lines and replace the deleted line(s) with new text read 
from the input stream. 

FORMAT: 


adrl, adr2c 


text 


éF 
DEFAULT: 

C is taken to mean .e,. C 

adC is taken to mean ad, adC 
VALUE OF ", "8 

set to the last line entered 
EXAMPLE 8 

= Before = ROCEDURE 3 


; 
3 
3 


Pp 
Y 
R 
A 
~- request sentence -T1,172C 
T 
V 
Z 


i 
tou tt 


= Arter’ = A 


3 
eon -> W e 
D 
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Insert Request (I) 


FUNCTIONS 


The insert request is used to enter input lines from the input 
stream and insert the new text immediately before the addressed 
line. The insert request is one of the few requests that can 
operate on an empty workspace. 


FORMATS 


adr I 


text 


cr 


DEFAULTS 


I is taken to mean .I 


VALUE OF "18 


set to the last line inserted 


EXAMPLES 
~ Before - A & PROCEDURE 3% 
X = Y 3 
END A 3 
~ request sentence -/X = /] 
Qe=R 3 
¢F 
- After - A & PROCEDURE 3 
Wow > Q =f 3 
X = Y $3 
END A $3 


Note: request adrI has the same effect as the request adr-lA. 
Request WI is used to insert text before the first line of 
the workspace. 
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BASIC EDIT REQUESTS 


The basic edit requests described below represent a subset of editor 
suitable for most editing situations. Additional requests are | 
described later in this section under "Extended edit requests" and 
"Auxiliary workspaces", 
Delete Request (D) 
FUNCTIONS 

The delete request is used to delete the addressed line or set 

of lines from the workspaces. 


FORMATS 
adr!, adr2D 


DEFAULTS 
D is taken to mean .,.- D 
adD is taken to mean ad,adD 
VALUE OF " "8 


set to the line immediately following the last line deleted | 


EXAMPLES 
~ Before - A % PROCEDURE $3 
X = Y § 
Q=R 3 
S=T 3 
END A 3 


- request sentence -/Q=/ , /S=/D 
-~ After - A * PROCEDURE $8 


X= Y $3 
Mgnt => END A $3 
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The Print and Print with Number Requests (P and L) 

FUNCTION? 
The print requests are used to print the addressed line or set 
of lines? P prints the addressed line(s) without line numbersL 


prints the addressed line(s) and prefixes them with their 
internal line numbers. 


adr!, adr2P or adri, adr2L 
DEF AULT 

P or L are taken to mean .,-P OY egel 

adP or adL are taken to mean ad,adP or ad,adL 
VALUE OF " "3 


set to the last line addressed by the request(i.e. the last 
line to be printed) 


EXAMPLE? 
- contents of workspace - A PROCEDURE 3 
X = Y $ 
Q=R 3 
S=T 3 
END A 3 
~- request sentence - /X=/ ,/S=/P 
~- printed output - X = Y 3 
Q=R 3 
uo" —->S = T 3 
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Quit Request (Q) 


FUNCTIONS 
The quit request is used to exit from the editor and does not 
itself save the result of any editing that might have been 
done. If the user wishes to save the modified contents of the 
workspace, he must explicity use a write or forced write 
request (see below). 

FORMATS 
Q 

DEF AULT 
The quit request cannot have an address 


NOTE the quit request must terminate a request lines the remainder 
of the line is treated as a comment. 
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Read Request (R) 


FUNCTIONS 
The read request is used to append the contents of a 
Specified source unit after the addressed line. The read 
request is one of the few requests that can operate on an 
empty workspace. 

FORMATS 
adrRname 
name is the name of a SSF source unit in a library to be read 
in the workspace after the line addressed by adr. The name of 
the unit follows the syntactical rules for a unit name in 


LIBMAINT (Ciee. etflibs:] name) $ it can be preceded by any 
number of spaces and must terminate the request line. 


DEFAULTS 
Rname is taken to mean $Rname 
VALUE OF ®,"8 


set to the last line read from the unit 


EXAMPLE8 
~ before - A & PROCEDURE 3 
X = Y $ 
END A 3 
~ request sentence - /X=/R BX 


where BX contains the following text 


B & PROCEDURE +3 
C=D $3 
ND B $3 


t PROCEDURE $ 
= Y $ 
* PROCEDURE $3 
C=D $3 
"."—> END B 3 

END A $ 


C 
E 
~ after - A 
X 
B 
C 
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Substitute Request (5S) 
FUNCTIONS 


The substitute request is used to modify the contents of the 
addressed line or set of lines by replacing all strings that 
match a given regular expression with a specified character 
string. 
FORMAT 
adrl,adr2S/regexp/string/ 
(the first character after S is taken to be the regular 
expression delimiter and can be any character not appearing 
in either regexp or in string). 
DEFAULTS 
S/regexp/string/ is taken to mean ey, e-0o/regexp/string/ 
adS/regexp/string is taken to mean ad, adS/regexp/string 
VALUE OF " "8 
set to the last line addressed by the request 
QPERATIONs 


Each character string in the addressed line or lines that 
matches regexp is replaced with the character string. If 
string contains character &, each & is replaced by the string 
matched by regexp. The special meaning of & can be Suppressed 
by preceding & with the escape sequence {C. 


EXAMPLE 
- Before - THE QUICK BROWN SOX 
- Request S/SOX/ FOX 
- After - THE QUICK BROWN FOX 
~ Before - XYZINDEX = Q 3 
~ Request - S? INDEX?(&)? 
- After - XYZC INDEX) = Q3 
- Before - X = Y 
~ Request - S/$/3/ 
- After - X = Y 3 
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The Write and Forced Write Requests (W and Z) 
FUNCTIONS’ 


The write and forced write requests are used to write the 
addressed line or set of lines into a specific source unit. 
If the source unit already exists, request W will be rejected 
and request Z will result in the overwriting of the existing 
unit with the addressed line(s). 


FORMATS 


adrl,adr2 ot {(type)] [(LIBs] name 
Z 


“name"® is the name of a Source unit to be created (WN) or 

overwritten (Z) in the specified library. The name of the 
unit must not exceed 31 characters in length + it can he 

preceded with any number of Spaces and must terminate the 
request line. 


"type" is the language type to be-set in control records of 
the output library. Applicable values are the same as for 
parameter TYPE in the MOVE SL command. 

DEFAULT: 
Wname or Zname are taken to mean ,$Wname or ,$Zname. 
adWname or adZname are taken to mean ad,adWname or 
ad,adZname. 


If type is omitted, DAT is assumed unless the member already 
exists in LIB, in which case the existing type is preserved. 


VALUE OF " "38 


unchanged 


EXAMPLES8 
WC COB) MYPROGRAM 


Z UNIT-A 
Z( COB) M2 
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The No~operation Request (N) 
FUNCTIONS 
The no~operation request N is used to position on a line 
without issuing any output on the report. It is identical to 
the locate request with the difference that the located line is 
not printed. 
FORMATS 
adr N 
adr is the address of the line to position on. 
DEFAULT: 
N is taken to mean .N 
VALUE OF ", "38 
set to adr. 
EXAMPLESS 


oN 
PROCEDURE DIVISION/N 
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Count Lines Request (#) 


FUNCTIONS 


The count lines request counts the number of lines which, in a 
specified range, contain the given regular expression. 
The count is printed on the execution report. 


sh ar 


FORMAT $ 
adrl,adr2#/regexp/ 
- adril,adr2 specify the range of the counting (first line, 
last line) | 
- regexp Specifies the regular expression 
(the first character after # is taken to be the regular 
expression delimiter and can be any character not appearing 
in regexp) 

DEFAULT: 


#/regexp/is taken to mean .,.#/regexp/ 
ad#/regexp/ is taken to mean ad,ad#/regexp/ 


VALUE. OF “ots 


set to adr2 
EXAMPLES3 
1, $#/X=3/ 


130, 500#/SECTIONZ 
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EXTENDED EDIT REQUESTS 


The editor requests discussed up to this point comprise a basic 
subset sufficient for most applications. A user learning to use 
the editor for the first time might be well advised to stop at 
this point. 

Print Line Number Request (=) 


FUNCTIONs 


This request is used to print the line number (as contained in 
the SSF header and not to be mistaken with the rank of the line 
in the workspace) of the addressed line. 

FORMATS 
adr = 

DEFAULTS 
: is taken to mean .= 

VALUE OF "."3 
set to the line addressed hy the request 

EXAMPLE 8 


- contents of the workspace - 


- SSF header - - text- 
1000 A PROCEDURE 3 
1100 X = Y 3 
1300 P=Q0 3 
1800 END A 3 


- request - 1+2= or /Q3/= 


- response - 1300 
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Global Request (G) 


FUNCTIONS 


The global request is used in conjunction with some other 
request (e.g. print, print with number, print line number, 


delete). 

That request is to operate only on those lines addressed by the 
Global request that contain a matcn for a Specified regular 
expression. 


FORMATS 


adr! ,adr2Gx/regexp/ 
where "x" muSt be one of the following requests: 


D delete lines containing "regexp" 

P print lines containing "regexp"; 

L print with number lines containing "“regexp"$ 

= print the numbers of lines containing "regexp"; 
DEF AULT 


Gx/regexp/ is taken to mean ¥ SOK/TEGEXD? 
adGx/7regexp/ is taken to mean ad,ad Gx regexp/ 


VALUE OF ", "3 


set to adr2 of request 


NOTES 
The character immediately following the request x is taken to 
be the regular delimiter and can be any character not 
appearing in "regexp" 
EXAMPLE 8 
- Before - A s PROCEDURE 3 
Q=R 3 
X = Y 3 
END A 3 
- Request - “Tt, $GD/0/ 
- After - A t PROCEDURE 3 
X = Y 3 
* tt=> END A 3 
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Exclude Request (V) 
FUNCTIONS 


The Exclude request is used in conjunction with some other 
request (e.g. print, print with number, print line number, 
delete). That request is to operate only on those lines 
addressed by the exclude request that do not contain a match 
for a specified regular expression. 


FORMATS 

adri, adr2Vx/regexp/ 

where "x" must be one of the following requests: 

D delete lines not containing “regexp"™ 3 

P print lines not containing "regexp" 3% 

L print with number lines not containing “regyexp" 3 

= print the numbers of lines not containing "regexp" 
DEFAULT 8 


Vx/regexp/ is taken to mean ,$Vx/regexp/ 
ad Vx/regexp/ is taken to mean ad, ad Vx/regexp/ 


VALUE OK "."3 


set to adr2 of request 


NOTES 
The character immediately following the request x is taken to 
be the regular expression delimiter and can be any character 
not appearing in "regexp". 
EXAMPLE 
- Before —- A * PROCEDURE $ 
Q=R 3 
X = ¥ 3 
X =Q $3 
END A 3 


- Request -— 1,$VP/Q/ 
- Response - A t PROCEDURE $ 


X= Y 3 
END A 3 
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AUXILIARY WORKSPACES 


The discussion up to this point has assumed the existence of 
only one single workspace. Actually the editor Supports up to 6 
different workspaces. (ne workspace at a time can be 
designated as the "current workspace": any other workspaces at 
this time are referred to as “auxiliary workspaces". All the 
editor requests described so far operate within the current 
workspace. 

Each workspace is given a symbolic name & "OHH EN Mon Ngu nga 
or "5", When the editor is invoked a single workspace 
(workspace "O") is activated and designated as the current 
workspace. Additional workspaces can be created merely by 
referencing a previously undefined workspace name. 


Workspace names are usually enclosed between parentheses? 
however these may omitted (e.g., "5" is taken to be "(5)"), 


Change Workspace (B) 


FUNCTIONS 
The change workspace request is used to designate an auxiliary 
workspace as the current workspace. The previously peo gnanee 
current workspace becomes an auxiliary workspace. 

FORMAT? 


B(x) or Bx 


where "x" is the name of the workspace to become the current 
workspace. 


VALUE OF ",%8 
restored to the value of "." when workspace "x" was last used 
as current workspace (i.e., the value of "."is maintained 
separately for each workspace and saved as part of the 
workspace status). 

EXAMPLE 


BC5) 
B4 
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Copy and Move Requests (K and M) 


FUNCTION? 
The copy and move requests are used to copy or move one or more 
lines to a specified auxiliary workspace. The addressed lines 
replace the previous contents (if any) of the auxiliary 
workspace. 
FORMATS 
adr | ,adr2 id (x) or adrl,adr2 Ml x 
K Kf. 
where "x" is the name of the auxiliary workspace to which 
lines are to be copied or moved 
DEF AULT? 
M(x) or K(x) are taken to mean .,eM(X) or .,2K(Xx) 
adM(x) or adK(x) are taken to mean ad,adM(x) or ad,adK(x) 
VALUE OF " "3 
set to last copied line for K or the line after the last 


copied for M in the current workspace $3 set to () in the 
specified auxiliary workspace 


EXAMPLE? 

~ Before - 
~ Current workspace - - Workspace 2 - 
A s PROCEDURE ABC = DEF 3 
X = Y 3 END BIN $3 
Y= K ¢ 
K = 3 
END A $3 
-Request - AK3/,7R3/7M(2) 
- After - 
~ Current WorkSpace ~ ~-~ Workspace 2 - 
A & PROCEDURE Y= K 3 
X= Y 3 K = R s 

NS "SEND A 3 


Request /K3/7,/R§7K(2) would have left the current 
workspace unchanged and given the same contents for 
workspace 2. 
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Workspace Status Request (X) 
FUNCTION? 
The workspace status request is used to print a summary of the 
status of all workspaces currently in use. The name and length 
(in lines) of each workspace is listed : the current workspace 
is marked with a right arrow "—-->" {immediately to the right of 
the workspace name. 
FORMATS 
X 
VALUE OF os 
unchanged 
EXAMPLES 
If the user has created the additional workspaces 2 and 4 and 


has designated 2 as his current workspace, the output of the 
workspace status request might be as follows? 


*WORKSPACE(O) 157 
*WORKSPACE(2) ———>32 
*WORKS PACE (4) 53 


This output indicates 157 lines in workspace O(the initial 
workspace)332 lines in workspace 2(the current workspace) and 
53 lines in workspace 4. 
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Special Escape Sequence 


Input to the Editor can be viewed as a stream of EBCDIC lines. 
Depending on the context, some of these lines are interpreted 
as Editor requests and others are interpreted as literal text. 
ihe "“¢Blx)" escape Sequence is recognized by the Editor in 
either context as a directive to alter the input stream to read 
subsequent lines from workspace "x", 


When the text Editor encounters the sequence "¢B(x)", the 
entire escape sequence {s removed from the stream and replaced 
with the literal contents of the specified workspace. The text 
Editor proceeds exactly as if the the current content of 
workspace x were in the request stream in place of¢B(x). If 
another "¢B" escape sequence is encountered while accepting 
input from workspace "x"(i.e. appears in the literal contents 
of workspace x), the newly encountered escape sequence also is 
replaced by the contents of the named workspace. The text 
Editor allows the recursive replacement of "¢B" escape 
sequences by the contents of named workspaces to a depth of 50 
nested¢B escape sequences. 


Request Stream Workspace X Workspace Y 
| a i 

2 b J 

3 Cc K 

4 d 1 

¢3(x) e m 

5 ¢Bly) n 

6 f fe) 

q 9g 

8 h 


is equivalent to the series of lines 


1234 abcdeijkimnofgh}56/7 8 


EXAMPLE OF USE OF ¢B 


NOTE 


The workspace to which the input Stream is redirected can 
contain Editor requests, literal text, or both. 

If the Editor is executing a request obtained from a workspace 
(rather than from the command stream) and the request specified 
a line number or regular expression for which no match is 
found, the usual error comment is suppressed and the remaining 
contents of the workspace are skipped. The escape sequence 
"“¢BCx)" can be thought of as a subroutine cal] statement, and 
the failure to match a line or regular expression specified by 
some request in workspace "x" can be thought of as a return 
statement. 


: The special meaning of "¢B" can be suppressed by preceding 
the character B with a "¢C" escape sequence (¢¢CB). 
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Use of Workspace for Moving Text 


Perhaps the most common use of workspaces in the editor is for 
moving text from one part of a unit to another. A typical 
pattern is to move the text to be moved into an auxiliary 
workspace with a Move request. For example the requests 


18,32M(5) 


moves lines from line number 18 through line number 32 
inclusive into auxiliary workspace 5. Once the lines have heen 
moved to an auxiliary workspace, they can be read as literal 
text in conjunction with an input request. For example, to 
insert the lines in workSpace 5 immediately before the last 
line in the current workspace, the following sequence might he 
used 


$I 
¢B(5)¢F 


In this case, the literal text in workspace 5 replaces the ¢B 
escape sequence and thus is treated as input to the editor 
already put in input mode by the Insert (I) request. Notice 
that the ¢F immediately following the ¢B escape sequence is 
correct since it can be expected that the last line in 
workspace 5 is terminated by a fictitious end of line mark that 
precedes the ¢F after the ¢B(5) is expanded. 


Qther Uses of Workspaces 


Another common use for workspaces is to define frequently used 
editing sequences. For example, to add the same source code 
sequence in several places in a program, the programmer might 
elect to enter the editing sequence into a workspace only once 
and invoke the contents of the workSpace as many times as 
necessary. 


The use of workspaces also allows a uSer to place more 
elaborate Text Editor request sequences into auxiliary 
workspaces and use the Editor as a psSeudo-programming language. 
In this context, it is useful to regard a workspace containing 
executable Editor requests as a subroutine and to view the "¢B" 
escape sequence as a call statement. 

The reader should refer to the “LIBRARY MAINTENANCE User Guide" 
for specific examples of use. 


The File Output and End File Output Requests (F and E) 


In normal mode, all results issued by the text editor are 
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printed on the execution report. This might be altered by mears 
of the F request which forces results, with the exception of 
error messages, to be appended at the end of the specified 
workspace. Reauest E returns to the normal reportina device. 


This might be used, for example, in the following circumstances: 


example * Construct a unit that contains all lines 
containing the string "CALL" or "RETURN" in 
unit Xi. The following sequence of requests? 


QR XI 

F (1) 

“1, SGP/CALL/ 
TW) $GP/RETURN/Z 
E 


achieves the requested objective. Instead of printing lines 
containing "CALL" and "RETURN", the editor apnencs them in 
workspace |] which might later be used by other renuests or 
written into the library. 


The Output Message Request (0) 


The 0 request causes the remainder of the request line to be 
printed on the output report. This might be of great help while 
debuoging editor macros to trace the execution of the 
workspaces. For example the Sequence 


BI 
A 
QLAMENTERING 8B] 


OTAMLEAVING BI 
¢F 
BO¢BI 


will trace the execution of workspace | and might help 
considerably in the debugaing. 
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Conditional (* and ?) Requests 


We have seen that a workspace can be viewed as a procedure 
which can be invoked by means of the ¢B(x) sequence.However, 
the expressive power of the procedural language (requests) is 
rather limited. The requests discussed in this section and the 
following one are aimed at giving fuller expressive power to 
the editor language by introducing conditions and jumps. 


FUNCTION OF “x's 
The Test Contents request (*) is used to test if a line in a 
given range contains a given regular expression. If such a line 
is found, the remainder of the request line is executed, 


otherwise it is discarded and execution continues with the 
following line. 


FORMATS 
adl,ad2*/regexp/otner-requests 
(the first character after * is taken to be the regular 
expression delimiter and can be any character not appearing 
in the regular expression). 

DEFAULTS 


x/regexp/ is taken to mean .,.*/regexp/ 
ad*/regexp/is taken to mean ad,ad*/regexp 


VALUE OF " "38 


Set to the matched line if a match occurred 3 set to the line 
addressed by ad2 otherwise. 


FUNCTION OF "?"8 
The Test Range request (?) is used to test if the current line 
(".") belongs to a given range of lines. If so, the remainder 
of the request line is executed, otherwise it is discarded and 
execution continues with the following line. 
FORMAT8 
ad|l,ad2? other-requests 
DEFAULTS 
ad? is taken to mean ad,ad? 
? is taken to mean ‘“1,$? which means that the remainder of 
the line is executed except if the current workspace is 
empty. 
VALUE OF "3 


unchanged 


k2=o5 


The Goto (>) Request 


FUNCTIONS 


The goto request (>) can only be executed from a workspace. It 
is used for skipping a number of request lines or for going a 
number of request lines backwards. 


FORMATS 


> [+i] n or >Lx (see the following page for this latter 
format) 

if the sign is omitted, + is assumed 

n is a decimal number giving the number of lines to skip 
forwards (+) or backwards (-). 


VALUE OF ", "3 
unchanged. 
OPERATIONS 


In the current workspace, a skip is made n lines forwards or 
backwards. If this causes a positioning before the first line 
of the workspace a branch to the first line is assumed $ if 
this causes a positioning after the last line of the workspace, 
an exit from the workspace is assumed. 


EXAMPLE3 
A common editing problem is the following 3: 


"For each line that contains string "stringl" perform some 
kind of action". 


Assuming that the detail of the action to be performed is 
contained in workspace 2, the above problem can be solved by 

AN 

oy ok/stringl/>+2 

>+4 

¢B(2) 

$?>+2 

e+ | N>-4 
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Labels (8x) and Goto Label (>Lx) 


The previously defined method of skipping backwards and 
forwards in the request stream might be inconvenient when the 
contents of the request stream (in a workspace) are to be 
altered. In this case all offsets have to be recalculated each 
time that a line is inserted or deleted. 


Labels allow symbolic reference to a request line. 


A label is defined as being the sequence #x, where x stands for 
any character, in the first position of a request line (i.e. 
columns | and 2). Setting a label does not otherwise alter the 
execution of the statement. 


A labelled statement can be referred to in a goto statement as 
follows 3 


>L.x 
where x stands for the character defining the label. 


The example in the preceding section could thus equally have 
been written as follows? 


“IN 

tN .,$*/string/>LeE 
> 1X 

* E¢ BQ) 

$?>LX 

et+IN>LNn 

3X 
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MISCELLANEOUS REQUESTS 


We have grouped under this header a number of requests which 
will not be of great. usSe to a first time uSer of. the TEXT 
EDITOR. 

The reading of this section might therefore be deferred until a 
Specific need arises, 


Top of Page Request (T) 


FUNCTIONS 


The top of page request T is used to force a skip to the top of 
a new page on the TEXT EDITOR output report. 


FORMAL: 
1 
DEFAULT: 
NONE 
VALUE OF ", "3 
left unchanged 
EXAMPLE ® 


request 
Tse 


will cause the printing of the whole current workspace, 
starting at the top of a new page. 
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The Split Line Request (%) 


FUNCTIONS 


The split line request is used to break down lines into two or 
more lines depending on their contents. 


FORMAT 8% 
ad!]l,ad2%/regexp/ 
(the first character after % is taken to be the regular 
expression delimiter and can be any character not appearing in 
regexp) 
DEFAULT: 
%/reqgexp/ is taken to mean .,.%4/regexp/ 
ad%/regexp/ is taken to mean ad,ad%/regexp/ 
VALUE OF "3 
Set to ad2 
ACI IONS 


All lines matched by regexp in the Specified range are treated 
as follows 3 
- if the match is before the first character in the line or 
after the last one, no action is taken 


~ otherwise, the line is broken down as many times as regexp 
appears in the line. Each resulting line is delimited by 
the first character matched by regexp. 


Before Request After 
ABC ABC (match is the |]st character of line) 
CDA “1,S47A/ CD 
BABABA A 
B 
AB 
AB 


A (match is last of line) 
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The Concatenate Request (&) 


FUNCTION? 


The concatenate request is used to concatenate lines which 
fulfil a certain criterion. 


FORMATS 
adr! ,adr28/regexp/ 
(the first character after & is taken to be the regular 
expression delimiter and can be any character not appearing 
in regexp) 

DEFAULT: 


&/regexp/ is taken to mean .,.&/regexp/ 
ad&/regexp/ is taken to mean ad,adé/regexp/ 


VALUE. OF fats 
set to adr2 

ACTION? 
All lines matched by the regular expression in the given 
range are merged (i.e. concatenated at the end) with the 


immediately preceding line. If the matched line 1s the first 
in the workspace no action is taken for that line. 


EXAMPLES 

Before 3 —A 
BB 
-C 
af 
F 
G 
oH 


Request 3 1,$&8/ 7 


Afters —A 


12-38 


The Search Backwards Request (<) 


FUNCTION? 


The search backwards reauest (<)is used to search for a given line 
hackwards. That is, starting from the line before the Specified 
one towards the first line of the workspace, then, if no match 
occurred, from the last line in the workspace towards the 


° 
~~ Tt 


specified line. 

FORMAT? 
ad</regexp/ 
(the first character after < is taken to be the regular 
expression delimiter and can he any character not appearing in 
the regular expression) 

DEFAULT: 
</regexp/ is taken to mean .</regexp/ 


VALUE OF as 


set to the matched line if found, to the line addressed by ad 
otherwise. 


=XAMPLES$ 


~ Before - 
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The Special Control Request (Y) 


FUNCTIONS 


The 
the 


user of the editor might wish to control the contents of 
report listing produced by the TEXT EDITOR or its behaviour 


when an error occurs. This is achieved by means of the Y 
Request. 


FORMAT: 


MEANING! 


YE: 


YR 


¥P 


YV (for Verbose) will produce a printing of all target 
lines in Substitute requests before the substitution is 
made, thus giving a trace of the modified lines. YM (for 
Mute) is the default setting which produces no trace. 


In normal mode, request and input lines are echoed on the 
report listing. This trace may be suppressed by means of 
the YB (for Brief) request. Default setting is YL (for 
Long) which produces the echo. 


YN (for Trace oN) will produce a trace of request lines 
executed from a workspace, thus providing a useful tool for 
debugging editor macros. Default setting Yr (for Trace orf) 
does not produce this trace. 


YS (for Strong) will produce a severity 3 diagnostic for 
all errors. YW (for Weak) will produce a severity | 
diagnostic for some user errors. Irrecoverable errors or 
system failures will still be reported with severity 3. 
Default setting is YS (severity 3 for all errors). 


YE! simulates the occurrence of a Severity |! error 3} YE3 
Simulates a severity 3 error. 


YR3 resets to zero the severity ! and 3 diagnostic 
counters3 
YR1 resets to zero the severity {f diagnostic counter. 


YP3 is used to specify that any subsequent Wor Z request 
is to be rejected if a severity 3 diagnostic has previously 
occurred. YP! is used to specify that any subsequent W or Z 
request is to be rejected if a severity 3 or | diagnostic 
has previously occurred. Default option is never to reject 
Wor Z requests even after a severity | or 3 diagnostic. 
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ESCAPE SEQUENCES 


The Escape sequence mechanism is a device provided to alter the 
way the editor interprets its input stream. Two of those 
sequences were already discussed earlier in this section: 


¢F, to indicate the end of input mode 
¢B, to denote workspace invocation 


The other eScape sequences will be discussed in this section. 
They are all introduced by means of symbol ¢ followed by a 
distinctive letter which might he followed by one or’more 


complementary characters. 
Protection (¢C) 


The protection escape sequence is used for entering text that 
might otherwise be treated as an eScape sequence. For example, 
to enter sequence ¢B(3) as a literal text,¢¢C3(3) should be 
entered in order that the Sequence is not considered as a 
workspace invocation. 


The general rule is that protection sequences ¢C are eliminated 
in all contexts after other escape sequences have heen treated. 
Protection sequences may be nested at any depth to provide 
successive protection against escape Sequence processing 3 


Ebeeaeed Soe ee OF 
[ae eee | ed 
n nN 


Hexadecimal Escape (¢X) 


A user may wish to work with characters for which no graphics 
exist. This can be achieved by means of the ¢X eScape sequence. 


In all contexts, sequence ¢Xhh(where hh stands for 2 
hexadecimal digits) is treated as if the single character whose 
internal hexadecimal representation is hh had heen entered. 
Note that two hexadecimal digits must be present (i.e.¢X0F and 
not¢xXF). Any sequence where syntax is incorrect (i.e. *¢XF, 
¢xXOZ,etc..) is treated as a literal string input. 


The meaning of the ¢X sequence can be overridden by means of 
the 


¢C protection escape sequence(i.e.*¢¢CX) 
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SUMMARY OF FUNCTIONS 


The attached table summarizes the syntax and use of the TEXT 
EDITOR functions. 


TABLE 12-1. SUMMARY OF EDIT FUNCTIONS 


Space |Locate d none set to ad 


last appended 


change work none unchanged 


space 


adi,ad2 C 


| 


last changed 


after ad2 


unchanged 


to all lines) ad! 


»,ad2Gx/re/ »sGx/re/ set to ad2 


12-42 


TABLE 12-1 (CONT). SUMMARY OF EDIT FUNCTIONS 


Request |Meaning Syntax Default Values of "," 


| 
| 
fae | 
| | 


| 
ol | last inserted 


aa adil ,ad2K(x) wget: CX) set to ad? 
print with 

L 
jline number 


unchanged 


ad} ,ad2L hale | set to ad2 


adl,ad2M(x) oye (x) set to ad2 


| = ne oer +. S/re/st/| set to ad2 | 
st/ 
| 


apply x to 
“TSVx/re/ 


H 


all lines 


ad!l,ad2Vx/re/ set to ad2 


except those 


with /re/ 


ad1l,ad2Wname $Wname unchanged | 
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TABLE 12-1 (CONT). SUMMARY OF EDIT FUNCTIONS 


Default Values of "." 


print 
workspaces none unchanged 
status 


YS 
YW 
YL YP(1)YE(1 
YM a | a none unchanged 


set to 
search ad</re/ matched 


backwards line or ad 


set to 
ad! ,ad2*/re/ oo tk/re/ matched 


line or ad2 


unchanged 
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TABLE 12-1 (CONT). SUMMARY OF EDIT FUNCTIONS 


. 4 


; 3 define label; 3 Xx | none unchanged 
? itest range lad! ,ad2? 1,$? unchanged 


count lines eg e#/re/ set to ad2 


{ 


split lines agar res set to ad2 


jconcatenate ogee &/re/ set to ad2 


llines 


| 


depending on 
B (x) 


| | 
| unchanged 
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INDEX 


. value 12—10 

< (search backwards) request, Text Editor 12—39 
<parameters> 6—01 ‘ 

< positionals> 6—01 

<verb> 6—01 

& (concatenate) request, Text Editor 12—38 

* (conditional) request, Text Editor 12—33 

% (split line) request, Text Editor 12—37 

> (goto) request, Text Editor 12—34 

> Lx (goto label) request, Text Editor 12—35 

? (conditional) request, Text Editor 12—33 

: X (label) Text Editor 12—35 

# (count lines) request, Text Editor 12—23 

= (print line number) request, Text Editor 12—24 


A 


A (append) request, Text Editor 12—13 
Auxiliary workspaces, Text Editor 12—27 
- Available functions 5—01 


B 


B (change workspace) request, Text Editor 12—27 
Basic language structure 6—01 


C 


C (change) request, Text Editor 12—14 
Card punch 5—05 
Cards 2—02 
Characteristics checking 4—02 
Checking characteristics 4—02 
CODE command (SL) 8—02 
COMFILE 5—05 
COMM command 7—02 
Command 6—01 

format 6—01, 6—08 
Commands applicable to 

all libraries (except SM) 7—01 

CU libraries 9—01 

LM libraries 10—01 

SL libraries 8—01 

SM libraries 11—01 
Commands, summary of 5—02 
Comments, Text Editor 1—10 
Compare command (SL) 8—04 
Compound addressing, Text Editor 12—06 
Context addressing, Text Editor 12—05 
CRLIST command (SL) 8—06 


i-01 


CU 
DELETE command 9-02 
functions available 5—07 
library commands 9—02 
LIST command 9—03 
MOVE command 9—04 
PUNCH command 9—06 


D 


D (delete) request, Text Editor 12—16 
DECODE command 

SL 8—08 

CU 9-02 

LM 10—02 

SM 11-02 
DELETE command (SL) 8—10 
Dictionary 2—01! 
Directory 2—01 


E 


E (end file output) request, Text Editor 12—31 
EDIT command (SL) 8—11 

EJECT command 7-03 

Errors in addressing, Text Editor 12—08 
Escape sequence, speciai (Text Editor) 12—30 
Escape sequences, Text Editor 12—41 

EXEC command 7—05 

Explicit list of member names 6-04 


F 


F (file output) request, Text Editor 12—31 
Files, sequential 2—02 
Format, Standard Access Record 8—01 
System Standard 8—01 
Functions available for 
CU 5—07 
LM 5—08 
MST 5—07 
SL 5—06 
SM 5—08 
Functions summary, Text Editor 12—42 
Functions, available 5—O1 


G 
G (global) request, Text Editor 12-25 
Hi 


i insert) request, Text Editor 1Z2—15 
identification 

display example 3—02 

of unit 3-01 


INDENT command (SL) 8—13 
Indirect list of member names 6—05 
INFILE 5—05 

INLIB1 5—05 

INLIB2 5—05 

INLIB3 5—05 

Input mode, Text Editor 12—12 
Input, LIBMAINT 1—01, 5—05 


IK 


K (copy) request, Text Editor 12—28 


L 


L (print with line furaber) request, Text Editor 12—17 
Language, basic structure 6—01 
LIB 5—05 
LIBMAINT 

input 1—01, 5—05 

output 1—01, 5—05 

scope and purpose 1—01 
Libraries 2—01 
Library 

commands 7—01 

contents 1—01 

level protection 4—01 
Limited star convention 6—07 
Line number addressing, Text Editor 12—04 
LIST command 

CU 9—03 

LM 10—03 

SL 8—15 

SM 11—04 
List of member names 6—04 
LM 

DELETE command 10—02 

functions available 5—08 

library commands 10—01 

LIST command 10—03 

MOVE command 10—04 

PUNCH command 10—06 

RENAME command 10—07 
LOAD command (SM) 11—05 
LOWER command (SL) 8—16 


M 


M (move) request, Text Editor 12—28 
Member 2—01 
name 6—03 
names, 
explicit list of 6—04 
indirect list of 6—05 


i-03 


MOVE command 
CU 9-04 
LM 10—04 
SL 8-17 
SM 11—05 
MST 
functions available 5—07 


N 


N (no operation) request, Text Editor 12—22 
Name, member 6—03 


O 


O (output message) request, Text Editor 12—32 
Objects handled 2—01 

OUTFILE 5—05 

Output, LIBMAINT 1—01, 5—05 


P 


P (print) request, Text Editor 12—17 
Parameters 6—01 
Positionals 6—01 
PRINT command (SL) 8—23 
Protection 4—01 
characteristics checking 4—02 
library level 4—01 
type 4—01 
PUNCH command 
CU 9—06 
LM 10—06 
SL 8—24 
Purpose of LIBMAINT i1—01 


Q 


Q (quit) request, Text Editor t2—i8 
QUIT command 7—07 


R 


R (read) request, Text Editor 12—19 
Relative addressing Text Editor 12—-04 
RENAME command 

LM 10—07 

SL 8—26 
Renumber command (SL) 8—27 
Responses, Text Editor 12—11 


i-04 


S 


S (substitute) request, Text Editor 12—20 
SARF 8-01 
Scope of LIBMAINT 1-01 
Search rules 6—02 
Sequential files 2—02 
Series addressing, Text Editor 12—07 
SL 
CODE command 8—02 
COMPARE command 8—04 
CRLIST command 8—06 
DECODE command 8—08 
DECODE command 8—10 
EDIT command 8—11 
functions available 5—06 
INDENT command 8—13 
library commands 7—01, 8—01 
LIST command 8—15 
LOWER command 8—16 
MOVE command 8—17 
PRINT command 8—23 
PUNCH command 8—24 
RENAME command 8—26 
RENUMBER command 8—27 
SORT command 8—28 
UPDATE command 8—30 
UPPER command 8—35 
SM 
DELETE command 11—02 
functions available 5—08 
INIT command 11—02 
library commands 11—01 
LIST command 11—04 
LOAD command 11—05 
MOVE command 11—06 
UNLOAD command 11-07 
SORT command (SL) 8—28 
Spacing Text Editor 12—10 
Special escape sequence, Text Editor 12—30 
SSF 8—01 
Standard Access Record Format 8—01 
STAR convention 6—06 
limited 6—07 
STATUS command 7—08 
Subfile 2—01 
Summary 
of commands 5—02 
of functions (Text Editor) 12—42 
SYSOUT 5—05 | 
System Standard Format 8—01 


i-0S 


T 


T (top of page) request, Text Editor 12—36 
Text Editor 12-01 
. Value 12—10 
addressing 12—03 
compound 12—06 
context 12—05 
errors 12—08 
line number 12-04 
relative 12—04 
series 12—07 
auxiliary workspaces 12—27 
comments 12—10 
escape sequences |2—41 
hexidecima! 12—41 
protection 12—41 
input mode 12—12 
requests 12—13 
< (search backwards) 12—39 
& (concatenate) 12—38 
* (conditional) 12—33 
% (split line) 12—37 
> (goto) 12—34 
> Lx (goto label) 12—35 
? (conditional) 12—33 
: X (label) 12—35 
# (count lines) 12—23 
= (print line number) 12—24 
A (append) 12—13 
B (change workspace) 12—27 
C (change) 12—14 
D (delete) 12—16 
E (end file output) 12—31 
F (file output) 12—31 
format 12—09 
G (global) 12—25 
I (insert) 12—15 
K (copy) 12-28 
L (print with line numbers) 12—17 
locate 12—11 
M (move) 12—28 
multiple 12—10 
N (no operation) 12—22 
O (output message) 12—32 
P (print) 12-17 
Q (quit) 12-18 
R (read) 12—19 
S (substitute) 12—20 
T (top of page} 12—-36 
V (exclude) 12--26 


i-06 


W (write) 12—21 
X (workspace and status) 12—29 
Y (special control) 12—40 
Z (forced write) 12—21 
responses 12—11 
spacing 12—10 
special escape sequence 12—30 
usage 12—01 
TITLE command 7—09 
Type protection 4—0i 


U 


Unit 2—01 

identification 3—01 

level protection 4—03 
UNLOAD command (SM) 11—07 
UPDATE command (SL) 8—30 
UPPER command (SL) 8—35 


V 


V (exclude) request, Text Editor 9—26 
Verb 6—01 


W 
W (write) request, Text Editor 12—21 


X 
X (workspace and status) request, Text Editor 12—29 


Y 
Y (special control) request, Text Editor 12—40 


Z 
Z (forced write) request, Text Editor 12—21 
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